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PREFACE 



This manual describes how to use the various time-shoring features of CP-V. It presents on introductory subset of the 
features in a format that allows the user to learn the material by using the features at a terminal as he reads through 
the manual. A closely related manual, the CP-V Time- Sharing Reference Manual, 90 09 07, is the principal source 
of information for the time-sharing features of CP-V. It defines the rules for using the Terminal Executive Language 
and other on-line processors. 

Manuals describing other features of CP-V are outlined below: 

• The CP-V Batch Reference Manual, 90 17 64, is the principal source of reference information for the batch pro- 
cessing features of CP-V (i.e., job control commands, system procedures, I/O procedures, program loading and 
execution, debugging aids, and service processors). 

• The CP-V Remote Processing Reference Manual, 90 30 26, is the principal source of information about the re- 
mote processing features of CP-V. All information about remote processing for all computer personnel (on-line 
and batch users, system managers, remote site operators, and central site operators) is included in the manual. 

• The CP-V System Management Reference Manual, 90 16 74, is the principal source of reference information for 
the system management features of CP-V. It defines the njles for selecting hardware for a CP-V system, gen- 
erating a CP-V system, authorizing users, maintaining user accounting records, monitoring system performance, 
and other related functions. 

• The CP-V Operations Reference Manual, 90 16 75, is the principal source of reference information for CP-V 
computer operators. It defines the rules for operator communication (i.e., key-ins and messages), system start-up 
and initialization, job and system control, peripheral device handling, recovery and file preservation. 

Information for the language and application processors that operate under CP-V is also described in separate mon- 
uals. These manuals are listed on the Related Publications page of this manual. 



COMMAND SYNTAX NOTATION 



NotaHon conventions used in 


command specifications and examples throughout this manual are listed below. 


h4otaHon 


Description 


lowercase letters 


Lowercase letters identify an element that must be replaced with a user- 
selected value. 




CRndd could be entered as CRA03. 


CAPITAL LETTERS 


Capital letters must be entered as shown for input, and will be printed as shown 
in output. 




DPndd means "enter DP followed by the values for ndd". 


[] 


An element inside brackets is optional . Several elements placed one under the 
other inside a pair of brackets means that the user may select any one or none 
of those elements. 




[KEYM] means the term "KEYM" may be entered. 


^. J 


Elements placed one under the other inside a pair of braces identify a required 
choice. 




Al 

. , means that either the letter A or the value of id must be entered. 


... 


The horizontal ellipsis indicates that a previous bracketed element may be 
repeated, or that elements have been omitted. 




name[,name]. . . means that one or more name values may be entered, 
with a comma inserted between each name value. 


I 


The vertical ellipsis indicates that commands or instructions have been 
omitted. 




MASK 2 DATA,2X'1EF' 

! means that there are one or more statements 

BYTE DATA, 3 BA(L(59)) ""'^^"^ ^"^""" '^^ ^"° ^^^^ directives. 


Numbers and 
special characters 


Numbers that appear on the line (i.e., not subscripts), special symbols, and 
punctuation marks other than dotted lines, brackets, braces, and underlines 
appear as shown in output messages and must be entered as shown when input. 




(value) means that the proper value must be entered enclosed in 
parentheses; e.g., (234). 


Subscripts 


Subscripts indicate a first, second, etc., representation of a parameter that 
has a different value for each occurrence. 




sysidi,sysid2,sysid3 means that three successive values for sysid should 
be entered, separated by commas. 


Superscripts 


Supercrlpts indicate shift keys to be used in combination with terminal keys, 
c is control shift, and s is case shift. 




L" means press the control and case shift (CONTROL and SHIFT) and 
the L key. 


Underscore 


All terminal output is underscored; terminal input is not. 




J_RUN means that the exclamation point was sent to the terminal, but RUN 
was typed by the terminal user. 


©e© 


These symbols indicate that an ESC (@), carriage return (@), or line feed (©) 
character has been sent. 




J_EDIT @ means that, after typing EDIT, a carriage return character has 
been sent. 



I 



1. INTRODUCTION 



CONTROL PROGRAM-FIVE 

Control Program-Five (CP-V) is a general purpose system that operates on a Sigma 6, 7, or 9 computer and a variety 
of peripheral devices. The current release provides for three concurrent modes of operation: 

• Time-sharing. 

• Multiprogrammed batch processing. 

• Remote processing. 

Two odditional modes of operation (real-time and transaction processing) will be available in the near future. 

SCOPE OF THIS MANUAL 

This manual is designed as a simple guide for using CP-V in time-sharing mode only. It is not intended as a guide 
to "sophisticated" usage, nor as a complete reference to TEL and other processors. Please refer to CP-V/TS Refer- 
ence Manual, 90 09 07, and applicable language reference manuals for complete command forms and descriptions. 
However, Appendix A of this manual presents a summary of TEL commands in reference format. 

The command formats shown in the text are not necessarily complete, as for example in the case of PC L COPY. 
Only the more commonly used forms are given and explained. Also, knowledge of the programming languages avail- 
able under CP-V is required for full understanding of this manual. 

The examples throughout this manual are written for Teletype® terminals. 2741 tenninal users should read Appen- 
dix F, "Use of the 2741 Terminal", before reading further in the manual. 



TERMINAL EXECUTIVE LANGUAGE 

The Terminal Executive Language (TEL) is the on-line command language for CP-V, a concise natural language for 
performing on-line functions and calling on-line processors. It also provides information services, such as account- 
ing charges and status of available system resources. 

Functions performed directly by TEL commands include 

Building a file. 

Initiating a processor. 

Loading and executing a programj 

Quitting or continuing an interrupted processor. 

Copying a file. 

Deleting a file. 

Controlling output. 

Setting DCB assignments. 

Submitting batch jobs. 

Checking the status of batch jobs. 

Saving and restoring files. 

Queuing output for symbiont devices. 



® 



Registered trademark of the Teletype Corporation. 
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• Setting tab stops for terminal I/O. 

• Controlling the terminal interface (e.g., page width and length). 

• Setting the log-on password. 

• Communicating with the operator. 

On-line processors available to the user through TEL include 

COBOL ANS COBOL. 

FORT4 Extended version of FORTRAN IV. 

META Assembler with powerful procedure (macro) capability: Meta-Symbol. 

BASIC Processor for creating, executing, and maintaining programs written in a simple mathematical 

language. 

APL Processor for interactive problem solving with a minimum of programming effort. 

FLAG Fast "load and go" FORTRAN compiler. 

EDIT Line/text editor. 

PCL Language for copying and deleting files, listing directories, and manipulating tapes. 

DELTA Debugging processor used primarily for assembly- language progroms. 

FDP Debugging package for FORTRAN programs. 

LINK Subsystem that constructs an executable program (load module) from object- program modules. 

BATCH Subsystem that submits a batch job file to the batch job stream. 

Processors are usually called explicitly by name but may also be called Implicitly by the following TEL commands: 

BUILD Calls Edit to build a file. 

COPY Uses PCL to copy files. 

RUN Uses Link to link a program and causes the program to be loaded and executed. 



Terminal Executive Language 




5r 



c 

Q 



LLl These keys are missing on some models. 

LLl This key is posiMoned elsewhere on some models. 



LAJThis is interpreted as | (OR) on Model 7015. 
HThis is interpreted as — < (NOT) on Model 7015. 



Figure 1. Teletype Keyboard 



2. LOGGING ON AND OFF 



DIAUNG THE COMPUTER 

To establish connection with the computer, proceed as follows: 

1. Turn on power switch for terminal and for acoustical coupler (or "modem"), as necessary. 

2. Pick up telephone handset, wait for dial tone, and dial computer. A high-pitched tone will be heard 
if a communication line is available. 

3. Place handset on acoustic coupler (see Figure 2). 

TEL (Terminal Executive Language) now responds with the following message: 

XEROX CP-V AT YOUR SERVICE 

ON AT (time and date) 

LOGON PLEASE: 
You can now log onto the system (provided you have been enrolled on the system by the system manager). 

LOGGMfiONANDOFF 

To log on, you must have an account number, a name, and possibly a fxassword. The account is your billing 
number and the name is your personal or group identification. Both are assigned by the system manager. 
Password is an account-protection feature that is assigned either by the system manager or by yourself (see 
PASSWORD Command, below). It can be modified periodically for security purposes. 

Upon receipt of the message LOGON PLEASE:, enter youraccount, name, and password, in that order, separated 
by commas. The password and preceding comma are omitted if no password has been assigned. 




Figure 2. Typical Dialing Unit 



Logging On and Off 



Account number and password may each be from one to eight characters in length. The name may consist of 
one to 12 characters. 

The allowable characters for names, accounts, and passwords are 

A-Z a-z 0-9 — $ * % : # @ - 

The graphic representation of certain special characters, such as the left arrow, is terminal-device dependent, as is 
the availability of the lowercase alphabetlcs. The character set shown above should be regarded as representative 
only in this respect. 

For terminals operated in full-duplex mode, character echoing by the system is normally on but can be turned off 
(e.g. , to suppress printing of passwords or other security-related information) by striking the E keys. Striking 
the @E keys a second time turns echoing back on. For terminal units operated In half-duplex mode, character 
echoing by the system must be turned off, as above, to suppress duplicate printing of characters. 

It may not always be possible to log on. If an error prevents the reading of the logon file, the message UNRECOV- 
ERABLE I/O ON RAD, or ABNORMAL ERROR ON LOGON FILE will be typed. Whenever you are unable to log 
on, start over by striking the BREAK key and try again. The system tries five times to log you on before dis- 
missing you. 

If a MAILBOX file (a message file) exists at log-on time, the message CHECK DC/MAILBOX will appear. You may 
examine this MAILBOX file by copying It to your terminal as follows: 

I COPY MAILBOX 

(The underscored exclamation mark is the "prompt character" issued by TEL. ) 



Example I. Logging On and Off. 



XEROX CP-V AT YOUR SERVICE 


The user dials the computer. 


ON AT L2:30 MAR 12, '71 


The system identifies itself, sbates the time and date, 
and requests that the user log on. 


LOGON PLEASE: 2232, HALL ® 


In response, the user types in his account number (2232) 
and name (HALL). He does not use a password be- 
cause the system manager has not assigned him one. 


12:30 03/12/71 2232 15-9 [l] 


A page heading is printed by the system; the Items of 
information In the heading are, in order: time, date, 
account number, two internal identifiers, and 
page number (enclosed in square brackets). 


_!_OFF @ 


The Terminal Executive types its prompt character (!) 
indicating that the system is ready to process a TEL 
command. Since this was just an experiment for the 
user, he logs off. 


CPU = .0124 CON = :01 INT = 2 CHG = 10 


Summary of accounting information for session. 



In Example!, the user used . 0124 minutes of central processor time (CPU =.0124); he was connected to the terminal 
(from dialing up to end of accounting summary) .01 hour (CON = :01); he interacted with the system twice 
(INT = 2), logging on and the OFF command. His charge was 10 charge units, an installation-defjendent value. 



Logging On and Off 



Example 2. Logging On with a Wrong Account Number 



XEROX CP-V AT YOUR SERVICE 
ON AT 02:30 MAR 12, '71 

LOGON PLEASE; 223L,HALL © 
ACCOUNT/ID 223L/HALL ? 

LOGON PLEASE: 2232, HALL 
-page heoding- 
_!_OFF @ 
-accounting summary- 



The user dials the computer. 



He types in the right name but the wrong account number. 

The system questions the incorrect account number, and 
asks the user to log on again, which he does. 



He then logs off. 



Example 3. Inability to Log On Due to Error in Logon File 



XEROX CP-V AT YOUR SERVICE 
ON AT 12;42 MAR 17, '71 
LOGON PLEASE: C37-105,HALL® 

The user tries to log on. 

ABNORMAL ERROR ON LOGON FILE 
SORRY, UNABLE TO LOG YOU ON 

The system cannot log him on and so informs him, 

CPU = .0024 CON = :01 INT = 1 CHG = 10 
The accounting summary is presented. 

XEROX CP-V AT YOUR SERVICE 



The system repeats its logon sequence. 

ON AT 12:43 MAR 17, '71 
LOGON PLEASE: C37-105,HALL @ 

This time the user's logon is accepted, 
-page heading - 

J^OFF® 

He now logs off. 

CPU = .0024 CON = :01 INT = 2 CHG = 15 



PASSWORD COMMAND 

The purpose of the logon password is to protect your resources and files by preventing illicit use of your name 
and account number. The PASSWORD command allows you to change your password frequently to make it 
difficult for anyone else to know what it is. You can also use the command to cancel your password if you 
wish. 

It is important to remember your password because only the system manoger is able to recover it for you if you do 
not remember it. 



PASSWORD Command 



Example 4. Setting a Password 



XEROX CP-V AT YOUR SERVICE 
ON AT 12:49 MAR 17, '71 
LOGON PLEASE: 2232, HALL® 

The user logs on, with no password set. 

J_PASSWORD SECRET ® 
PASSWORD CHANGE SUCCESSFUL 

The Terminal Executive types its prompt character (I) indicating it is ready to process a TEL command. 
The user sets his password to SECRET and must now use it whenever logging on until he or the system 
manager changes it. 

-page heading- 

J_OFF @ 

The Terminal Executive types its prompt character and the user logs off. Password SECRET remains set. 
-accounting summary- 



Example 5. Logging On with Password and then Cancelling Password 



XEROX CP-V AT YOUR SERVICE 
ON AT 14;45 MAR 17, '71 
LOGON PLEASE: 2232, HALL® 

The user logs on but forgets to use his new password. 

PASSWORD ? 

The system indicates that the password was not entered. 

LOGON PLEASE: 2232, HALL, SECERT ® 

The user logs on with an incorrect password. 

PASSWORD ? 



The system indicates that the password is invalid. 

LOGON PLEASE: 2232, HALL, SECRET © 

The user now logs on with the correct password. 

-page heading- 
J_PAS SWORD © 

He cancels his password by typing the PASSWORD command and specifying no password. 

PASSWORD CHANGE SUCCESSFUL 
J_OFF ® 

He then logs off. Next time he logs on, no password will be required, 
-accounting summary- 



PASSWORD Command 



Example 6, Setting a Password and Suppressing Its Printing 



XEROX CP-V AT YOUR SERVICE 
ON AT 09:05 MAR 20, '71 
LOGON PLEASE; 2232, HALL© 

The user logs on. 

-page heading- 

_!_PASSWORD @ E © E © 

The Terminal Executive types its prompt character (!) indicating it is ready to process a TEL command. 
The user sets his password but suppresses its printing by typing @ E before the password (the first E is 
not actually echoed), then turns echoing on again. He must now use the password he has just set 
whenever logging on, until he or the system manager changes it. Any sequence of 1-8 permissible 
characters may be used as a password. 

PASSWORD CHANGE SUCCESSFUL 
_!_OFF © 

The Terminal Executive types its prompt character indicating it is again ready for a TEL command. 
The user logs off. The next time he logs on, he must use the password just set. 

-accounting summary- 



PASSWORD Command 



3. TERMINAL INTERFACE 



INTRODUCTION 

This chapter describes methods for correcting, modifying, and deleting terminal input and the use of the TERMINAL, 
PLATEN, and TABS commands. 



EDITING OF TERMINAL INPUT 

A line of terminal input may be corrected, modified, or deleted, before the line is released to the system (with©). 
This may be done by way of either character or line deletion: 

1. Editing by Character Deletion: On detecting a typing error within a few characters of the point of error, 
you may delete the last characters typed by typing a corresponding number of rubout© characters (echoed 
with a \ character), and continuing the line from the (deleted) point of error. (Any n successive ©char- 
acters effectively delete the n successive characters Immediately preceding the first© character.) 

2. Editing by Line Deletion: To delete a complete line of input —before giving a carriage return, strike the 
ESCAPE and X keys or simultaneously depress theCONTROLandXkeys(@X or X^ in conventional notation). 
The system responds with a —(left arrow), effectively deletes the line, gives a carrlage-return/line-feed, 
and positions the carriage to the beginning of Input. (The previous prompt charocter, if any. Is not repeated.) 
The Input can then be repeated in correct form. The X*- command will delete not only the current input 
line, but all lines typed ahead and all pending output. 

These editing features apply to any untransmitted line of terminal input, under TEL or any other processor except Delta. 

Example 7. Making Corrections to TEL Commands 



XEROX CP-V AT YOUR SERVICE 
ON AT 15:30 MAR 22. '71 
LOGON PLEASE: 2232,HALK\L® 

While logging on, the user hits a K Instead of an L. To delete K, he strikes the rubout key which echoes 
back to the terminal as a backslash. Then he types L and completes the logon sequence. (Note that the 
characters printed at the terminal are those echoed back to the terminal and are not necessarily the same 
ones typed, as for example \ for @.) 

- page heading - 

J_QAS SWORD Y07 X*^;^ 

The user then types in a password command but notices an error (password misspelled) before striking the 
carriage return key. Instead he depresses CONTROL and X simultaneously, which the system echoes 
back as a left arrow (or possibly an underline). This causes the line to be cancelled and a carriage 
return, 

PASTWo\\\ SWORD Y07 © 

PASSWORD CHANGE SUCCESSFUL 

The user notices still another error. This time he deletes three characters and then completes the 
command successfully. Note that prompt character (1) Is not repeated. 

j_OFF @ 

He then logs off. 

- accounting summary - 



Terminal Interface 



TERMINAL COMMAND 

The TERMINAL command is used to inform the system of the type of terminal used, and is required only if the 
terminal differs from a type of terminal unit specified as standard by the system. (This information can be obtained 
from the installation manager.) 

Format: 

TERMINAL tc 

where tc is an alphanumeric terminal code: 

33 for Teletype Model 33 
35 for Teletype Model 35 
37 for Teletype Model 37 
7015 for Xerox 7015 Keyboard Printer. 

(Additional terminal codes will become applicable as more types of terminal units are added to the system's 
capabilities. ) 



Example 8. Use of TERMINAL Command 


XEROX CP-V AT YOUR SERVICE 


ON AT 11:45 MAR 23, '71 


LOGON PLEASE: 2232,HALL,Y07 


- page heading - 


j_TERMINAL 37 © 


Indicates a Model 37 Teletype. The system will use this Information to modify response to input/ 


output for different types of terminals, as necessary. For the rest of the session, the Monitor recog- 


nizes the terminal as a Model 37 Teletype. 


_!_OFF© 


- accounting summary - 



PLAnN COMMAND 

The PLATEN command can be used to change the page width and/or page length for terminal Inputand output. The 
format of the command is: 

PLATEN [w][,l] 



w is the maximum number of characters to be written per line on the terminal. If more than w characters 

are written, a line feed and carriage return character sequence is inserted to break up the output into seg- 
ments no longer than specified by w. If w is 11 or less, no line feed and carriage return sequence is sup- 
plied. In this case, the width of the line is limited only by the physical constraints of the device on which 
the line is produced (up to a maximum of 140 characters). If the w field is omitted, the current width set- 
ting is retained. 

I is the number of lines per page of terminal output and must be within the range 0-256. If the I field is 

omitted, then the number of lines per page remains unchanged. If I is set to 1 1 or less, no heading Is 
produced and the page length is unlimited. 
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The default case when a user logs on is equivalent to PLATEN 0,0. This means that no line feed and carriage 
return sequence is supplied, that no heading is produced, and that the page length is unlimited. 



Example 9 shows how PLATEN can be used to change page width. The example contains four [ob steps, i.e. , major 
functions during a session that cause the invoking of processors such as EDIT, PCL, or META. 

Example 9. Using PLATEN Command to Change Page Width 



XEROX CP-V AT YOUR SERVICE 
ON AT 17:24 APR 15. '71 
LOGON PLEASE: 14777, HALL ® 



17:24 04/15/71 14777 



23-7 [l] 



_!_BUILD TESTl @ 

1.000 1234567890123456789012345678901234567890 @ 
2.000 @ 

The user enters the BUILD command to build file TESTl. File building is described in detail in Chapter 4. 
(This is the first [ob step of the session. ) The © alone on line 2. 000 terminates the build operation and 
control returns to TEL. 

_!_PLATEN 20® 

The page width is set to 20. 

_!_COPY TESTl TO ME © 
12345678901234567890 
12345678901234567890 

File TESTl is printed at the terminal . The page width is now 20. (The COPY command, which implicitly 
invokes the PCL processor, is the second job step.) 

j_PLATEN 39 @ 

The page width is set to 39. 

j_C0PY TESTl © 
123456789012345678901234567890123456789 



File TESTl is printed again but with 39 characters per line. (This COPY constitutes a third job step. Note 
that the output specification TO ME Is omitted. PCL assumes ME as a destination device by default.) 

j_PLATEN 12 @ 

The page width is set to 12. 

_[_C0PY TESTl © 

123456789012 

345678901234 

567890123456 

7890 

File TESTl is printed again but now has 12characters per line. (This is the fourth and last job step.) 

j_OFF © 

The user logs off. Note that the last PLATEN command is still in effect. (However, the page width and 
length is always set to the default case, equivalent to PLATEN 0,0, when a user logs on.) 



CPU = 


,0097 


CON= 


:03 INT 


= 13 


CHG = 



42 
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Example 10 shows how PLATEN is used to change page length. (This example also contains four job steps.) Note 
that the page-length specification refers to the number of single-spaced lines in the body of the page, i.e., exclud- 
ing top-of-page heading and spacing. Each line of double-spaced output, where double spacing occurs, counts as 
two lines. Therefore, if n double-spaced print lines are desired, the page-length must be specified as nx2. Oc- 
casionally, only n-1 lines, or less, will be printed due to various circumstances, e.g., an intervening single- 
spaced command line. 



Example 10. Using PLATEN Command to Change Page Length 



XEROX CF-V AT YOUR SERVICE 
ON AT 17:29 APR 15. '71 
LOGON PLEASE: 1A777,HALL@ 



17:30 04/15/71 14777 



21-9E1] 



j_BUILD TEST2@ 

1.000 1 @ 

2.000 2 @ 

3.000 3 © 

4.000 4 © 

5.000 5 © 

6.000 6 © 

7.000 7 © 

8.000 8 © 

9.000 9 © 
10.000 10 © 
11.000 11 © 
12.000 12 © 
13.000 13 © 
14.000 14 © 
15.000 15 © 
16.000 © 

The user builds file TEST2. (The ©alone on line 16.000 terminates the build operation and control 
returns to TEL. ) 

iPLATEN 72,12© 

The PLATEN command sets page width to 72 characters and the length to 12 lines. 

17:30 04/15/71 14777 HALL 21-9C2] 

The system prints the second page heading, on overflow of newly set page length. 

_|_COPY TEST2 TO ME © 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

n 

A copy of file TEST2 is printed at the terminal. 

17:31 04/15/71 14777 21-9[3] 

The third page heading prints. 
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j_OFI 


© 


















The 


12 


-line 


pag 


e is 


still in 


effect 




CPU= 


=.0129 


CON= 


:05 


INT 


= 19 


CHG = 


15 



TABS COMMAND 

The TABS command is used to simulate typewriter-like tab stops for terminal input and output. TABS supplies the 
tab-setting values that are to be used by the system when it encounters a 'tab character' in the input or output line. 

You can then tabulate by typing I (CONTROL and I), or ©I (ESCAPE followed by I), in your input wherever you 
desire a tab in both the input and corresponding output. However, in order to cause tab characters to be inserted 
whenever the F or @I sequence is typed, the space-insertion mode must be turned off by typing ©S (ESCAPE fol- 
lowed by S). 

The tab settings can be changed by another TABS command. Tab simulation can also be turned off, and then back 
on, with the key sequence ©T. 



Example 11. Using the TABS Command 



XEROX CP-V AT YOUR SERVICE 
ON AT 17:35 APR 15, '71 
LOGON PLEASE : 14777, HALL© 

- page heading - 

ITABS 8,22,37,45,52 © 

The user sets tab-stop values for terminal input and output. 

l@S\_@ 

Space insertion mode is turned off. 

! BUILD TEST3© 

1.000 THIS© EXAMPLE© ILLUSTRATES© USE© OF© TABS© 
2.000 © 

File TESTS is built using tabulation (© = 1 or ©I). 

ICOPY TEST3® 

THIS EXAMPLE ILLUSTRATES USE OF TABS 

This file is printed with tab simulation on. 

j.©T\.© 

The user now turns off tab simulation with the sequence ©T. 



Editing of Terminal Input 13 



_[_COPY TEST3 @ 

THIS EXA24PLE ILLUSTRATES 


USE 


OF 


TABS 




























The file now prints with 


no 


tabb 


•ng. 


Note that 


sing 


e 


spaces 


are 


inserted 


in 


P 


ace 


of 


tab 


cha 


racters. 


lOFF @ 


































- accounting summary - 
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4. MANIPULATING FILES 



FILES IN CP-V 

Almost from the moment you become a user, you start accumulating data — the information upon which the system 
must operate to provide the answers to the problems you pose. All of the processors mentioned in Chapter 1 produce 
some kind of data; for example: 

• Edit allows you to create the collection of statements necessary to phrase a problem-solving procedure in 
the language of on assembler or compiler, called a source program, and to create input data for 
such programs. 

• BASIC, FORTRAN, and META allow you to translate a source program, which is only a model of the 
external idea, into a form suitable for execution by the machine. This translation produces object code 
as the result of either a "compi lotion" or "assembly" process. 

• LINK prepares the relocatable object code for machine execution, in the form of a lood module. 

These different kinds of data have at least one characteristic in common: each must be stored in some retrievable 
form, both between the steps of an information-processing operation, and between executions of the same operation. 

Conventional batch systems provide the user with several ways of storing data, principally on punched cards or 
magnetic tape. Although these media provide low cost, long-term storage, they require operator intervention at 
the central computer site when the stored information is to be accessed or updated. This Intervention may be 
merely inconvenient for batch operation when the information is used frequently, but it is generally Infeasible for 
on-line use of a time-shoring system. 

The System's file management capabilities provide an alternative and remarkably versatile medium for maintaining 
your working data —a medium which greatly lessens your dependence on conventional external forms of storage, and 
Increases the flexibility with which the data can be manipulated. File storage is Implemented through use of the 
Xerox Rapid Access Data Storage System (RAD) and/or through use of public disk packs. Generally speaking, a RAD 
is a nonremovable rotating-disk memory device containing approximately 6 million characters(or bytes)of storage, 
any portion of which can be accessed within a very short time. Public disk packs provide approximately 24 million 
characters of storage. (The system allows you, the on-line user, to access conventional peripheral-storage devices 
and private disk packs also. If you are so authorized.) 

The Monitor, through Its file-management system, allows information to be stored on RADand/or disk packs and Identi- 
fied symbolically, simply by a file name chosen by the user. The files are segregated by account number (your iden- 
tifying number assigned by the Installation manager). Therefore, you cannot inadvertently generate file names that 
conflict with those of other users outside your account. Certain other information about the file, such as restrictions 
on access by other users, is also kept with the file. 

Files can be used to store any kind of Information. They can contain source- language programs built with Edit or 
BASIC, translated source programs produced by a compiler (relocatable object code), or object code in executable 
form (a load module) produced by the link-loader. They can also contain collections of alphanumeric data, and 
natural-language text. 

A file Is identified by a name of 1-10 characters constructed from a prescribed set of characters. (Some processors, 
such as Edit, allow up to 31-character file names for special purposes.) The permissible character set contains all 
of the alphabetic and numeric characters plus most of the commonly used special symbols. Typically, you will need 
no more than the alphabetic and numeric characters. In the command-language formats given throughout this man- 
ual, the symbol most commonly used to indicate a "file name" is fid, which stands for fi le-identification. A file- 
Identification actually can Include an explicit account number and password, as well as the file name. But in our 
examples, and in most actual usage, fid is Interpreted simply as a file name. Complete rules for the structure of 
flle-identlFicatlons are given in Appendix B. 

Having created a file of information, you are completely free to access or delete it, replace it, or modify it, through 
on-line services, without any operator intervention. A general rule is that you may not delete or modify files not 
in your account, though often you may access such files. 
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Sometimes files are created automatically for you by the system. It is possible to call a processor such as FORTRAN 
to translate a source program without specifying a file in which to store the object code. In this case, tlie system 
creates a unique temporary file, associated with your account, for output storage. You may refer to this file with 
the single character $ under certain subsystems. The $ file is temporary in the sense that when you log off, the file 
is automatically released. This is useful when creating test programs where nothing of permanent value is being 
created as output. 

Any file that is explicitly named for output Is permanent. I.e., retained in the file-management system across the 
periods between on-line sessions. All files explicitly created with BUILD and COPY commands are also permanent. 
Permanent-file content Is maintained and updated solely by the user. However, file storage space is a chargeable 
resource, and it Is in your interest to delete unneeded files whenever possible. 

When working with files, there are two command modifiers of importance: ON and OVER. ON implies that the 
named file does not yet exist. If such a file does indeed exist and ON is used, an error message is sent to the user. 
(In general, the word TO may be substituted for ON, with the same effect.) 

OVER implies that the file may exist already and, if so. Is to be reused for the new operation. Using OVER also 
results in a completely new version of the file; any old data in the file is lost. If the file does not exist and OVER 
Is specified, no error is noted, and the file Is automatically created. There is no limit to the number of operations 
that may be performed OVER a file. 

Information about the immediate intended use of a file Is called a file specification. These specifications are made 
implicitly by the use of several commands, particularly COMMENT, LIST, and OUTPUT. An explicit specification 
can be rrxade by the use of the SET command. (See Chapter 10, "DCB Assignments".) For our present purposes, file 
specifications may be considered to indicate that a file is an input or an output file, and If an output file, what 
type(s) of output the particular file is to receive. 

Once a file specification has been made. It remains In effect throughout a terminal session until changed or deleted 
by another specification — the one exception concerns source-Input files (operational label SI), which always default 
to the user's terminal at each job step. If, for example, listing output is directed to the file "DATA", then all listing 
output generated by a series of assemblies or compilotlons are placed on this file, one behind the other. This con- 
vention is known as "file extension" and Is automatically In effect for output operations on standard system-assigned 
files - or more precisely, through certain system-created Dota Control Blocks (DCBs). (DCBs are described in the 
CP-V/BP Reference Manual, 90 U 64, and discussed further in the TEL chapter of the CP-V/TS Reference Manual, 
90 09 07.) References to DCBs are gradually introduced further along in this manual, and they are treated specifi- 
cally in Chapter 10, "DCB Assignments". 

File extension is an important feature to keep in mind when operating at the termirxjl, especially when It Is not 
desirable to stack any output during multiple-job-step operotions. File extension is reset to the beginning of the file 
upon any new specification, even if the specification refers to an already existent file. For example: 

_!_LIST ON CRUNCH Listing output directed to file CRUNCH. 

J^OUTPUT ON RUNFILE Object-code output directed to file RUNFILE. 

_[META SOURCE Read input-file and assemble (job step 1). 

IMETA ME Assemble from terminal (job step 2). 

IMETA TESTY Read input-file and assemble (job step 3). 

This sequence of commands results in all output being stacked on their respective files, CRUNCH or RUNFILE. 

The new listing-output specification and further job step 

|LIST OVER CRUNCH 

_!_META (job step 4) 

has the effect of replacing the old contents of CRUNCH with the new assembly listing as the source input is entered 
from the user's terminal. The object-code output would still be stacked at the end of file RUNFILE. This basic use 
of file extension logic applies Independent of the manner In which file specifications are made, i.e., through the SET 
command or through commands Implying a specification. 
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To understand certain error comments you may encounter, you will need some knowledge of file organization. This 
refers to the way the file's contents, i.e., its individual records, are ordered. Three possible organizations ore 

• Consecutive, where the records can be accessed in sequential order only. 

• Keyed , where the records may be accessed directly (randomly) or sequentially. 

• Random , where the file is simply a collection of contiguous storage. 

Files built with the Edit processor, having a line number associated with each record (line), are an example of a 
kind of keyed file. Most files you will use will probably be keyed, but you may see a system comment stating 
". . .file not keyed. . . ". Certain processors are not keyed-file oriented, e.g., BASIC and PCL, though they handle 
keyed files properly in most coses. Later we indicate what you can do in other cases. 

EDIT 

The Edit processor is a general-purpose, line-number oriented text editor. It may be used to create or modify source 
programs, data files, reports, etc, for other CP-V processors, specifically for the FORTRAN, Meta-Symbol, BASIC, 
COBOL, and BATCH processors. 

Edit provides file editing capability, i.e., the ability to build, delete, copy, or merge files; to edit within a line 
of a file; and to do a complex editing operation on each line in a specified range of lines. 

The examples in this section illustrate how Edit is used to perform file editing, and to access a file and perfonm 
record (line) editing functions such as displaying (TY), inserting (IN), and deleting (DE). 

One example of intrarecord, or multiline editing is also given, as a basis for general use of the intrarecord-command 
group. Edit commands not covered here are described in the CP-V/TS Reference Manual, 90 09 07. 

In the command descriptions thot follow, the word "line" refers to a line typed by the user; the word "record" refers 
to a line that has alreody been transmitted to the system and exists on some file. Thus, we can say ". . .the line 
numbered n replaces any identically numbered record. . . " (i .e. , already on the fi le) without ambiguity. The ex- 
amples are intended to illustrate usage of the various commands and do not necessarily show the most appropriate way 
of dealing with a particular kind of file content. More appropriate means may become apparent in later chapters, 
especially in regard to manipulation of BASIC program text. 

HOW EDIT WORKS 

Edit is a line-number oriented editor In that it automatically associates a line-sequence number with each line of a 
file built under Edit. All record and intrarecord editing is performed with reference to these sequence numbers. 
That is, one or more sequence numbers must be specified for record and intrarecord editing commands and also in 
certain usages of the file editing commands. 

To edit a file that does not have sequence numbers associated with it (e.g., a file built under BASIC or under certain 
batch-mode facilities), you can add the numbers by copying the file with "resequencing" (see Example Copy and 
Resequence). 

Edit prompts with an asterisk (*) character to indicate that it is ready to accept a command. For file-building or 
line-insertion input, it prompts with a sequence number. 

FILE EDITING COMMANDS 

All file editing commands explicitly name one or more files. The Edit and TEL/Edit commands at the file-editing 
level are: 

• |EDIT [fid] 

Calls the Edit processor and optionally names a file to be edited, at TEL level (I). 

• *EDIT fid 

Names a file to be edited, at Edit processor level (*). 
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2BUILD fid[,n] 

Calls Edit and names a file to be built at the TEL level (I). 

*BUILD fid[,n] 

Names a file to be built at the Edit processor level (*). The optional number (n) specifies the sequence 
number with which the file is to begin. If not specified, 1 is assumed by Edit. 



50PYfid,{^0VER 



f< On] 



Copies contents of fidi either ON a new file or OVER an existing file, fid2; and, optionally, resequences 
(i.e., renumbers) fid2 starting with sequence-number n. COPY can also be used to produce a sequence- 
numbered (keyed) version of an unkeyed file, in which case n must be specified. 

• ^.I^ELETEfid 

Deletes the named file from the system. 

• *MERGE fid ^[,n^-n2] INTO fid^, n^-n^ 

Replaces records no through n/ of fld2 with the contents of (or record n] through no of) fidi; the merged 
records — from fidi —are renumbered in fid2 starting with sequence-number no. Note: If fid2 does not 
already exist, the specified records on fid] are copied to the new file and numbered starting with no (i.e., 
a "selective copy" operation is performed). 

• *END 

Terminates execution of Edit and returns control to the system (TEL) level. 

RECORD EDITING COMMANDS 

To use any of the record or intrarecord editing commands, the applicable file must first be specified with an EDIT- 
fid command either at the TEL or the Edit level. None of the record and intrarecord-level commands themselves can 
specify a file. 

A useful record-editing command is TY— Type Record(s), Including Sequence Number — which displays one, several, 
or a 1 1 of the records in a f i le : 

TYn,[-n2] 
where 

ni is the sequence number of the first or only line to be typed, 

no is the optional ending sequence number of a range of lines to be typed. 

More record-editing commands are described following the next example. 



Wherever TO is specified, ON may be substituted. 
Example 12. Using EDIT to Build and Display a Source File 



In this exomple, the user builds a BASIC program file, copies it to another file, displays the copy, and 
deletes the original file. 

XEROX CP-V AT YOUR SERVICE 
ON AT 15:12 MAR 28. '71 
LOGON PLEASE: 2232, HALL ® 
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- page heading - 
IBUILD PRIME © 

The user wants to create a file called PRIME. Edit is called implicitly, 

1.000 10 REM GENERATE PRIMES GR THAN 3 © 

Edit prompts for input by printing ] .000 . The user types the first line, then types lines 2-10 in respcxise 
to more prompts by Edit. 

2.000 20 P=l @ 

3.000 30 P=P+4,S=0© 

4.000 40 FOR I = 5 TO SQR(P) + 1 STEP 2 @ 

5.000 50 Q=INT<P/I) ® 

6.000 60 IF Q*I=P THEN 80 © 

7.000 70 PRINT P"TAB(0)© 

8.000 80 IF S=l THEN 30 © 

9.000 90 S=l, P=P+2 © 

10.000 100 GOTO 40 © 

11.000 © 

The user types a carriage return immediately following the prompt for line 11.000 to indicate end-of- 
file, that is, that the last line of the file has been entered. (Control returns directly to TEL, rather 
than to Edit, because BUILD was given at the TEL level.) 

J_EDIT © 

TEL prompts for another command. The user calls Edit again, explicitly this time, to use a command 
not available at TEL level. 

EDIT HERE 

*COPY PRIME ON PRIMES © 

Edit acknowledges its presence, and prompts. The user decides to change the name of his program file 
from PRIME to PRIMES, so he copies it too new file named PRIMES. 

, .COPYING 



.COPY DONE 



*EDIT PRIMES © 

He then indicates that he wants to edit (actually only display) file PRIMES. 

*TY 1-10 © 

He indicates that he wants the whole file, lines 1 through 10, typed. (A larger ending number, 
e.g., TY 1-99, would do the same job.) 



1.000 


10 


REM GENERATE PRIMES GR THAN 3 


2.000 


20 


P=l 


3.000 


30 


P=P+4 , S=0 


4.000 


40 


FOR I = 5 TO SQR{P) + 1 STEP 2 



5.000 


50 


Q=INT(P/I) 


6.000 


60 


IF Q*I=P THEN 80 


7.000 


70 


PRINT P' 'TAB(O) 


8.000 


80 


IF S=l THEN 30 


9.000 


90 


S=l, P=P+2 


10.000 


100 


GOTO 40 



*DELETE PRIME © 



Edit displays the copy, and prompts. The user sees that the copy is OK and decides to delete the 
original file, PRIME, so as not to tie up disk space unnecessarily. 
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..EDIT STOPPED 



The record editing mode is terminated for file PRIMES because file PRIME is to be processed. The 
above message is printed to indicate this. 

. .DELETED 
*END @ 

He then indicates that he is finished with Edit. 

J_OFF @ 

and logs off. 

- accounting summary - 



MORE RECORD EDITING COMMANDS 

Two more commonly used record-level commands are IN (Insert Records) and DE (Delete Records). The IN command 
is used to insert one or more lines between two records of a file or, alternatively, to replace one record of the file 
with the first (or only) insert line. (The IN command can be used to replace only one record, though more records 
may be inserted immediately following the replacement. ) The IN command format is 

INn[,i] 

where 

n is the sequence number of the first or only line to be Inserted. 

i is the optional increment value that Edit is to odd to succeeding insertion-line sequence numbers. 

Detailed rules for the use of IN are given following the next example. 

The DE command deletes one or more (successive) records from the file. It has the format 

DE n[-m] 
where 

n is the sequence number of the first or only record to be deleted. 

m is the optional end sequence number of a range of records to be deleted. 
Example 13. Using EDIT to Modify a Source File 



In this example, the user (after "desk -checking" his initial source program) sees that a logicolly required 
BASIC statement (NEXT) is missing, and inserts it. He then realizes that this original program will produce 
an endless listing of prime numbers, and prepares a different version, using MERGE to excerpt a portion of 
the original program for modification, and then to recombine this portion, after modification, with a copy 
of the original (thus, retaining the original version also). 

XEROX CP-V AT YOUR SERVICE 



OK AT 15:28 MAR 28, '71 
LOGON PLEASE: 22 32, HALL © 



- page heading 



J_PLATEN 72,10 



The user suppresses further page headings by giving a page length of less than 12. (This practice Is not 
recommended for normal production work, where the page headings delimit a uniform document size 
and provide useful identification: name, date, time, page number.) 
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UDIT PRIMES® 

He then indicates he wants to edit PRIMES. 

EDIT HERE 
*TY 6-99 © 

He asks for disploy of lines 6 through end-of-program, i.e., line number 99 is in this case sufficiently 
large to include the whole file, (Note that"6-99" is equivalent to "6.0-99.0" or "6.000-99.000", etc.) 



6.000 60 IF Q"I=P THEN 


80 


7.000 70 PRINT P' 'TAB(O) 




8.000 80 IF S=I THEN 30 




9.000 90 S=l, P=P+2 




10.000 100 GOTO 40 




--EOF HIT AFTER 10. 





This message means: "End-of-file was found following line 10". 
<;IN 6.5© 

The user asks to insert a line numbered 6.5, to add the missing statement. 

6.500 65 NEXT I © 

Edit prompts for the insertion-line with the line number. It then prompts for another command with 
an asterisk. 

^TY 6-7 © 

The user requests a display of lines 6 through 7, to see if the insert really worked. 



6 


000 


60 


IF 


r- 


I=P 


THEN 


80 


6 


500 


65 


NEXT 


I 
P' 


'TAE 


(0) 




7 


000 


70 


PRINT 





*MERGE PRIMES, 6.1-10 INTO NEWEND , 7 © 

He then asks for a portion of PRIMES to be copied on a new, empty file, NEWEND, and for the lines 
to be renumbered, starting with 7. 



. .EDIT STOPPED 
. .MERGE STARTED 
--DONE AT 11. 
"EDIT NEWEND 

JtY 1-11 © 



He requests a display to see if 7-11 was "excerpted" all right. 



7.000 65 NEXT I 

8.000 70 PRINT P''TAB(0) 

9.000 80 IF S=l THEN 30 
10.000 90 S=l. P=P+2 
11.000 100 GOTO 40 
[IN 7.5© 

He requests an insert numbered 7.5, enters the Insertion as shown below, and then requests on insert 
at the end of the file, i.e., line 12. 
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7.500 66 IF P > 1000 GOTO 1100 
^IN 12© 

12.000 110 END © 

13.000 (g) 

Edit prompts for another insertion, line 13; the user replies with an immediate ©, signifying "done" 
*TY 6-12 @ 

He then requests display of lines 7-12 (no line lower than 7 should exist). 

7.000 65 NEXT I 



7 


500 


66 


IF P > 


1000 


GOTO 


110 


8 


.000 


70 


PRINT 


P' 'TAB(O) 




9 


.000 


80 


IF S=l 


THEN 


30 




10 


.000 


90 


S=l. P 


=P+2 






11 


.000 


100 GOTO 


40 





12.000 IIP END 
*COPY PRIMES TO LOPRIM © 



He requests an extra copy of PRIMES on new file LOPRIM. 



.EDIT STOPPED 
.COPYING 
■COPY DONE 



*MERGE NEWEND, 7-12 INTO L0PRIM,6 . 1- 10© 

He then asks for a replacement of the original program lines 6.1-10, with the modified program end- 
ing from NEWEND. 



. .MERGE STARTED 
--DONE AT 12.1 
*EDIT LOPRIM© 
^Y 5-13© 



He requests display of lines 5 through end-of-file on LOPRIM. 



5.000 50 Q=INT(P/I) 

6.000 60 IF Q*I=P THEN 80 

6.100 65 NEXT I 

7.100 66 IF P > lOOG GOTO 110 

8.100 70 PRINT P''TAB(0) 

9.100 80 IF S^l THEN 30 

10.100 90 S=I. P=P+2 

11.100 100 GOTO 40 

12.100 110 END 
-EOF HIT AFTER 12.1 



*DELETE NEWEND @ 



Since NEWEND is now appended, he deletes the file for the sake of economy. 



..EDIT STOPPED 
..DELETED 
fIN 1, .1 © 



He then decides to replace the original 'remarks' line (1.000), and specifies a small increment to 
allow room for further Insertion lines before line 2. 
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1.000 REM GENERATE PRIMES OVER 3 AND UNDER LOGO 

1.100 REM (THIS PROGRAM IS A LIMITED VERSION OF 

1.200 REM MY PROGRAM "PRIMES", WHICH HAS NO 

1.300 REM UPPER LIMIT BUILT IN.) 
1.400 



*TY 1-15® 



He requests display of result. 



1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 
1.100 REM (THIS PROGRAM IS A LIMITED VERSION OF 
1.200 REM MY PROGRAM "PRIMES". WHICH HAS NO 
1.300 REM UPPER LIMIT BUILT IN.) 
2.000 20 P=l 
3.000 30P=P+4,S=0 



10. 


100 


90 S=l. P= 


= P+2 


11 


100 


100 


GOTO 40 


12. 


100 


110 


END 




--EOF HIT AFTER 12 


1 



*END© 
_!_0FF @ 

- accounting summary 



RULES FOR USE OF IN 

The rules applicable to the IN command are summarized below. For ease of reference, the IN command format 
is repeated: 

INn[,i] 

1. If n matches a sequence number already in the file, the first (or only) insertion line replaces the identi- 
cally numbered line in the file. 

2. If n does not match a sequence number in the file, the first (or only) insertion line n is inserted immedi- 
ately following the next lower-numbered line (or at the beginning of the file if a lower line number does 
not exist). 

3. If the insertion sequence number increment, i, is not specified. Edit assumes as a default value for i either 
the increment specified in the most recent record-level command given during the current Edit session, or 
the value 1 if no increment has been previously specified. 

4. Following each record insertion. Edit prompts for further insertion lines with incremented sequence num- 
bers, until either the incremented sequence number equals or exceeds a sequence number already existing 
in the file, or the user responds with a carriage return only. (In the first case. Edit rings the console bell 
and returns immediately to command-input mode. Issuing an asterisk.) 



RULES FOR USE OF MERGE 

A more complete form of the MERGE command than Initially presented Is 
MERGE fid^[,n^[--n2]jINTO f'd2'"3[-"4] ['' ] 

The optional increment value, I, was not previously presented. It is used to control renumbering of merged records. 
For example, by specifying a small fractional (decimal) increment it Is possible to pock more records into the desti- 
nation file than might otherwise be possible. The rules for MERGE are as follows: 



1. The sequence numbers no - r\A specify the range of records to be deleted from the destination file (fid2), 
whether or not a one-for-one 
assumed as the value for n^.) 



whether or not a one-for-one replacement occurs. (If n, is omitted only record n_ Is deleted, i.e. , 



ng.s 
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2. Sequence numbers n^ -no specify the maximum range of lines to be transmitted from the source file (fid-i); 
default value of "i-no is 1 through EOF. If n-^ is omitted, only record n, is merged. (The actual number 
of records moved is controlled by the next sequence value above n^; see rule 4 below.) 

3. Renumbering of the records from fid. in fid. proceeds from n„, incrementing either by i or the default 
value, I. 

4. Records n] through no are moved into the interval n.^ - Hj on fid^, renumbered, until either the incre- 
mented sequence number of a moved record equals or exceeds the sequence number of the successor of n ,, 
or the range of records n^ - n„ is exhausted. 

5. Value n„ may equal n.; n . may equal n_. 

Note these characteristics of MERGE: (1) the number of fidi records moved is largely independent of the number of 
fid2 records deleted; (2) sequence number discontinuities may be introduced into fid2; and (3) by adjusting the in- 
crement value, the set of deleted records may be replaced by a much larger set of records. Note also that though it 
is a file-level command, MERGE has record-editing capabilities. 

The rules for IN and MERGE can be used as a general guide to the operation of other record-level commands with 
similar formats. 

STRING SEARCH COMMANDS 

The string-search type of command involves an automatic search by Edit for the occurrence of a certain string of 
characters within specified columns of a range of records. The records are searched one at a time and, if a "hit" is 
made on one or more of the records, the action specified by the command is performed (type or delete record). You 
specify the range of records to be searched, the string to search for, and the record columns within which the search 
is to be made ("all" by default). Edit does the rest. Note that the line number is not considered a part of the rec- 
ord and that column 1 is the first character of the record. 

Two string-search commands are available at the record-editing level. 

• Find and Type Records, 

• Find and Delete Records. 

The command formats are 

FT n^[-n2],/string/[,c^[,C2]] 
and 

FD n^[-n2],/string/[,c^[,C2]] 
where 

n. is the sequence number of the first or only record to be searched. 

n_ is the sequence number of the last of a range of records to be searched (default value = n.). 

string delimited by slashes (/. . ./), is any sequence of characters that may exist in the file. 

c, is the number of the column at which the search is to start in each record (default value = 1). 

c_ is the number of the column (inclusive) at which the search Is to end in each record (default value =140). 

The specified string must be found entirely within the columns specified. The columns of a record (or line) are 
numbered from 1 through 140, and though 72 is the upper limit for a Teletype line, columns 73-140 may exist in 
a record, as discussed below. (Other string-search commands are available at the intrarecord-editing level, and 
are generally more useful and efficient than those described above.) 
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HOW TO ENTER MULTILINE RECORDS 



On a terminal unit having an inherent line-width limit of less than 140 (e.g.. Teletype models 33, 35, and 37), 
a single, multiline record may be entered into a file (using the BUILD or IN commands, for example) in either of 
two ways: 

1. Using the local-carriage-return key marked LOC CR, if present, to "break" the input line without releasing 
it to the system. 

2. Using the simulated local-carriage-return sequence @©for the same purpose. 

Either method permits entering a record of up to 139 characters plus @ on virtually any terminal unit. 
Example 14. Using String-Search Commands and Local-Carriage-Return 



_!_EDIT @ 

EDIT HERE 

*COPY LOPRIM TO SCRATCH @ 

The user copies his program to a new file in order to experiment with FT, FD, and IN. 

*EDIT SCRATCH© 
*FT 2-15, /P=/ © 

He requests a search of records 2 through 15, all columns, for the character string "P=", with the 
record displayed on each hit. 



2 


000 


20 


P=l 


■^i' 




3 


000 


30 


P=P^ 


;=o 


10 


100 


90 


S=l 


P= 


=P+2 


—EOF HIT AFTER 


12 


1 



*FT 1-13, /=P/© 

He then asks for a search on "=P" in lines 1 through 13. 

3.000 30 P=P+4,S=0 
6.000 60 IF Q*I=P THEN 80 
10.100 90 S=l. P=P+2 
--EOF HIT AFTER 12.1 



*FT 1-2, /PR/© 

He now asks for a search on "PR" in lines 1 through 2. 

1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 
1.100 REM (THIS PROGRAM IS A LIMITED VERSION OF 
1.200 REM MY PROGRAM "PRIMES". WHICH HAS NO 
*FT 1-2, /REM/ ,4, 60 @ 

He tries a "negative" test of the column-delimiting capabilities, 

--NONE 

*FD 1.1-2, /REM/® 

then a flnd-and-delete of records 1.1 through 2, inclusive, containing "REM". 

--003 RECS DLTED 
*TY 1-4© 

He requests display of results. 



Edit 25 



1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 

2.000 20 P=l 

3.000 30 P=P+4.S=0 

4.000 40 FOR 1= 5 TO SQR(P)+1 STEP 2. 
*IN 1.5© 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OF©© 
PROGRAM "PRIMES", WHICH HAS NO SET UPPER LIMIT.)® 

He tries to reenter former lines 1.1 and 1.2 as one record, with a local line-break (©©). 

*FT 1-3, /REM/© 

1 .000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OFPROGRAM "PRIMES", WHIG 

H HAS NO SET UPPER LIMIT.) 

Note, (1) that the user neglected to supply a blank (or space) following "of" prior to or after the 
local carriage-return, and (2) that the system "folds" the record indiscriminately when the physical 
line-width limit Is reached. 



*END 



« 



INTRARECORD COMMAND USAGE 

The intrarecord commands make changes within an individual record. They generally manipulate character strings. 
Intrarecord commands may only be given after the user selects an intrarecord mode with the SE, SS, or ST command. 
The SE command will be discussed below as an example of selecting an intrarecord mode. 

The SE (Select Intrarecord Mode) command simply selects a range of records, and optionally a field within eoch rec- 
ord, for subsequent intrarecord "processing" commands to operate on. The selection remains in effect for any number 
of subsequent commands until a new selection rs made or a record editing command is given. 

After the SE is given. Edit prompts for further commands. You can then issue one processing command or several 
commands separated by semicolons (;) on the same input line. 

If one command is issued per line, the processing specified by that command Is pserformed against each record in the 
range specified by the SE. However, If more than one command is issued per line the whole set of commands will be 
processed successively against the first record, then against the second record, etc. (Obviously, if the range selected 
is only one record, the result is the same In either case.) 

The format of the SE command Is 

SE n^[-n2][,c^[,C2]] 

where the meanings and defaults of the record and column selection parameters are the same as for the FT and FD 
string-searching commands. 

Two very useful and similar processing commands are S (String Substitution) and D (Delete String). The S command 
format is 



[j]/string^/S/string^ 



/here 



string. Is the string to be searched for. 

string- Is the string to be substituted in place of string . 
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j is an integer t"ha1- indicates that only the jth occurrence of string] within the search field of each record 

■' "-o be replaced by string, (default value = 1). If all occurrences of string ore to be replaced, j must be 
lified as zero. 



is to be 
spec! 



The D command format is 

[jO/string/D 
where 

string is the string to be deleted. 

j has the same meaning as in the S command. 

Note that when substituting a longer string for a shorter string, the remainder of the line (If any) Is moved right only 
as far as needed to preserve a single-blank separator if at least one blank existed to the right of the original string. 
That is, in certain cases multiple blanks to the right of the insert may be lost. (This is useful in preserving columnar 
alignment,) 

In this regard, you may include initial, embedded, or terminal blanks (i.e., spaces) in either string. Edit treats the 
blank in general like any other printing character, the major exception being the suppression of multiple blanks in 
certain cases of string substitution and deletion. (A Blank-Preservation-Mode command, BP, in intrarecord opera- 
tions provides for cases where multiple blanks must not be lost, as in "quoted" character-string literals.) 

A number of other very useful, more specialized intrarecord commands exist for record modifications, but most of 
these are logical shortcuts to results that can usually be achieved with S and D commands only. 

The two intrarecord display commands, TY(Type, Including Sequence Number) and TS (Type, Suppressing Sequence 
Number) are analogous to their record-level counterparts, but do not specify record numbers (I.e., you enter TY or 
TS only). With or without sequence numbers, the commands display the currently active record(s), as Illustrated by 
the following example. 

Example 15. Using Intrarecord Commands 



J_ED1T SCRATCH © 

EDIT HERE 

*FT 1-2, /PROG/® 

The user enters the FT command to find and typie lines containing PROG, within the range 1 through 2, 
inclusive. (Only line 1.5 should satisfy the requirement.) 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OFPROGRAM "PRIMES", WHIG 
H HAS NO SET UPPER LIMIT.) 

*SE 1,5® 

He then enters the Intrarecord mode selection command, which is required to fix the error in the line 
by string substitution. 

*/OFPRO/S/OF PRO/ @ 

He substitutes OF PRO for OFPRO (first instance only: j = 1 by default). 

*TY © 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OF PROGRAM "PRIMES", WHI 
CH HAS NO SET UPPER LIMIT.) 

*TS@ 

To see if the line-break problem in line 1.5 would disappear if the line were displayed without its se- 
quence number (as will happen under the BASIC subsystem), he uses the TS command. 
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REM (THIS PROGRAM IS A LIMITED VERSION OF PROGRAM "PRIMES", WHICH HAS NO 

SET UPPER LIMIT.) 
*0/P/S/N/@ 

This does in fact solve the problem. Now he wants to change all program variables named P to Ns. 
(This will have no effect on the program, since we have no variables named N.) 



*TY© 

1.500 REM (THIS NROGRAM IS A LIMITED VERSION OF UROGRAM "NRIMES". WHI 
CH HAS NO SET UNNER LIMIT.) 

He forgot to reset the range selection (SE). 

*0/N/S/P/® 
*SE 2-13 © 
*0/P/S/N/© 



He reverses the N for P substitution in line 1 .5, then sets proper range, and tries his original substi 
tution again; 

9 STRINGS CHANGED 



-EOF HIT AFTER 12.1 



*TY© 



and checks the result. 



2.000 20 N=l 

3.000 30 N=N-+A.S^O 

4.000 AG FOR 1=5 TO SQR(N)+1 STEN 2 

5.000 50 Q=INT(N/I) 

6.000 60 IF Q^I=N THEN 80 

6.100 65 NEXT I 

7.100 66 IF N > 1000 GOTO 110 

8.100 70 NRINT N"TAB(0) 

9.100 80 IF S=l THEN 30 
10.100 90 S=l. N=N+2 
11.100 100 GOTO 40 
12.100 110 END 
-EOF HIT AFTER 12.1 



The substitution worked, except that it was not possible to delimit the search string narrowly enough; 
STEP to STEN, and PRINT to NRINT, were changed as well. 



*/STEN/S/SrEP/;/NRl/S/PRI © 



This reverses the change. 



*SE 4;TY@ 



The user requests a display of line 4 and, below, of line 8.1. 
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4.000 40 FOR 1=5 
*SE 8.1;TY© 


TO SQR( 


N)+l 


STEP2 








8.100 70 PRINT N 
*DELETE SCRATCH® 


'TAB(O) 














Since he did not 


actually 


need this 


file. 


he 


de 


letes it. 


..EDIT STOPPED 
. .DELETED 
*END@ 
















_!_OFF © 
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TEL EDITING COMMANDS VS EDIT COMMANDS 

The TEL command lEDIT fid implies the sequence 
|EDIT 
*EDIT fid 

The TEL command ! BUILD implies the sequence 
I^EDIT 
* BUILD 

*END 



Both ore, therefore, shortcuts provided for your convenience. However, note that the TEL EDIT command must 
be given before the Edit COPY command con be used, as distinct from the TEL COPY command. The TEL COPY 
command implies a call to the PCL subsystem; the COPY command under PCL is different from the Edit COPY 
command in scope, intent, and format. 

TEl/PCL COPY and other PCL commands are described in the next section. 



PCL 

The Peripheral Conversion Language, PCL, provides you v^^ith on-line facilities for initiating and controlling: 
Movement of files between peripheral storage devices. 

Movement of files between peripheral storage devices and RAD or disk pock storage (or other forms of sec- 
ondary storage). 

Movement of files within disk storage. 

Concatenation of files and selection of records from files during file movement. 

Data-record formatting and code conversion during file movement. 

Deletion of files. 

File building on any type of device or storage media from an on-line terminal. 
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• Display of peripheral Input-device files or RAD or disk pack files on an on-line terminal. 

• Listing of a RAD or disk pack file directory or of file names on a labeled magnetic tape. 

• Positioning (and releasing) of magnetic-tope volumes. 

The peripheral storage devices referred to may be 

1. Magnetic-tape drives: CP-V labeled, ANS labeled, or unlabeled tape. 

2. Unit-record devices: card punch and line printer (card reader cannot be requested on-line). 

As mentioned before, one common characteristic of peripheral devices is that they generally require operator inter- 
vention, e.g., for the mounting and dismounting of physical file volumes. Therefore, on on-line user must be spec! ally 
authorized in order to be able to use these devices via PCL (or any other on-line means); otherwise he will simply 
receive an error message on any attempt to do so. 

Many of the facilities listed above are mainly of interest to the experienced on-line user doing the kinds of pro- 
gramming that were heretofore necessarily restricted to central-site batch operations; commercial and large-scale 
scientific applications involving large volumes of input and output data, system development, etc. Actually, the 
complete set of PCL facilities, plus the TEL SET command and direct user-to-operator messages, provide control of 
total system resources analogous to that obtainable only with "hands on", central-site batch operations under pre- 
vious systems. 

We will describe only the PCL functions commonly used by oil on-line users. These Include keyed-file merging, 
building of unkeyed files, concatenation of unkeyed files, terminal display of either type of file, listing of file 
names, and file deletion. 

PCL COMMANDS 

The PCL COPY, L (which Is the TEL form of the PCL LIST command), and DELETE commands may be given at TEL 
level, but PCL must be called explicitly (_[_PCL) for all other PCL commands. PCL prompts for command Input with 
the less-than (<) character, and for file Input and responses to questions with a period. 

The PCL commands covered here are COPY, LIST, DELETE, and DELETEALL. COPY allows a vast array of options in 
its variable field; It is the workhorse of the PCL language. Therefore, only a subset of the possible variations of the 
command is described here. 



The COPY command format is 

TOt 



C[OPYldI/f!d,[,fId- ,fld ]] 

I i. n 



where 



OVER 



[dFfid ] 



d is a PCL identification code, which may Include 

DC - RAD file storage (default value for d). 

DP L*serlal no.,. . .^serial no.] - disk pack (serial no. default is system disk pack). 
ME - User's terminal. 
LP - Line printer. 
CP - Card punch. 

LTL serial no.L, 'serial no.J . . . J- CP-V labeled magnetic tape (serial no. default is "scratch tape"' 
ATL^serial no.[, 'serial no.J. . .J- ANS labeled magnetic tape (serial no. default is "scratch tape"). 
FTf'serlal no.[, 'serial no. J. . . J- Free form magnetic tape; i.e., unlabeled. 



fid 



Is a file identification, for DC, DP, LT, or AT files only; normally only a file name. Each PCL identifi- 
cation con be followed immediately by one or more special options In parentheses: I.e., d (option) or d/fid 
(option). If the default device code DC is not explicitly specified, the slash (/) preceding fld^ may be 
omitted; see the following example. 



Wherever TO Is specified, ON may be substituted. 
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If TO is specified, a new file is created (and must not already exist). If OVER is specified, the output file may 
exist; and if it does It will be deleted and replaced by a copy of the Input file. The TO /OVER clause Is optional 
following a prior COPY specifying a TO/OVER destination file or device (during the same session with PCL). If 
the TO/OVER clause Is omitted under these circumstances, the last-named file will be extended according to the 
file-convention. A subsequent TO/OVER clause or an exit from PCL terminates file extension. 

If multiple source files —e.g., FILA, FILB, FILC —are specified, the several file contents are either concatenated. 
I.e., joined end to end, on the destination file In the case of unkeyed files, or merged on the basis of record-key 
values In the case of keyed files. Eloth cases are Illustrated In the following examples. 

The remaining commands to be discussed in this introduction to PCL are LIST, DELETE, and DELETEALL. 

L[IST] lists all your disk-file names (i.e., all names in your account directory). This Is the simplified form of 
the LIST command. Additional specifications allow the user to list the files that are one particulardevlce. 

[DC/J 



DELETE 



DP^serial no.]/ 
DC/ 



fid[,fidj. . . deletes the specified files. 



DELETEALL] "Ti . i n /l[fromJ[,toJ deletes all files in the log-on account if 'from' and 'to' are not 
DPL'serial no.J/ p- -"" -" -f j n i ^ r r-i • ^l i ^ -c >c , 

I specified. Deletes a range of files in the log-on account if from 

and/or 'to' are specified. 'From' and 'to' are sort keys or file names. With this commend, PCL asks for 

a confirmation: 

DELETEALL? 

. YESS @ ("YESS" Is the only correct positive response. ) 

Example 16. Keyed-File Update and Display, Using PCL COPY 



The user wants to produce another version of the PRIMES program that will allow him to set, via the terminal, 
the range of the prime numbers produced during each run. He creates the modification files using Edit BUILD, 
but uses PCL COPY to achieve the actual file updating. 



!_BUILD MODl.l, .125 © 

The user wants to build a file starting with sequence number 1 and Incrementing by only .125, Instead 
of the standard (default) increment of 1. Note that we have added on i parameter (.125) to BUILD that 
corresponds to that of MERGE and INsert. 

1.000 10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS© 
1.125 11 PRINT 'ENTER LOWER BOUND FOR PRIMES'© 
1.250 12 INPUT L © 

1.375 13 PRINT 'ENTER UPPER BOUND FOR PRIMES'© 
1.500 14 INPUT U © 
1.625 © 
j_BUILD MOD2,7.1, .5 © 

He requests a second new file, starting with sequence number 7.1, but incrementing by. 5 in this case. 

7.100 67 IF P<L THEN 80© 
7.600 68 IF P<U THEN 110© 
8.100 .'^< 



_;_C0PY L0PRIM,M0D1,M0D2 TO VPRIM © 

He requests PCL to copy files LOPRIM, MODI, and MOD2, in succession to form new file VPRIM. 
Note that these are keyed files, and as such are not simply linked together end-to-end on VPRIM. 
MODI Is merged with LOPRIM, records from MODI replacing any records from LOPRIM having 
matching keys, and all nonmatching records falling Into their natural sequence. The same process Is 
repeated between MOD2 and the results of LOPRIM, MODI — and so on if more files were specified. 
(The source files themselves are not modified In any way. ) However, the three input files may be con- 
catenated without loss of any records by using the LN option (after VPRIM In the command) to assign new 
keys. 
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_!_COPY VPRIM TO ME @ 



He displays the results directly, using the PCL COPY command. Note that ME is a PCL identification 
code, not a name; VPRIM, not being a PCL identification code, is understood by default as DC/VPRIM. 



10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

11 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

12 INPUT L 

13 PRINT 'ENTER UPPER BOUND FOR PRIMES' 

14 INPUT U 
20 P=l 



65 NEXT I 

67 IF P<L THEN 80 

68 IF F>U THEN 110 
70 PRINT P' 'tAB(O) 



110 END 

XEDIT VPRIM © 
EDIT HERE 
*TY 1-13 S 

The user then displays the same results using Edit. 



1.000 10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

1.125 11 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

1.250 12 INPUT L 

1.375 13 PRINT 'ENTER UPPER BOUND FOR PRIMES' 

1.500 14 INPUT U 

2.000 20 P=l 

3.000 30 P=P+4.S=0 

4.000 40 FOR 1=5 TO SQR(P)+1 STEP 2 

5.000 50 Q=INT(P/I) 



6.000 


60 IF Q*I=P THEN 80 


6.100 


65 NEXT I 


7.100 


67 IF P<L THEN 80 


7.600 


68 IF P>U THEN 110 


8.100 


79 PRINT P' 'TAB(O) 


9.100 


80 IF S=l THEN 30 


10.100 


90 S=l, P=P+2 


11.100 


100 GOTO 40 


12,100 110 END 
--EOF HIT AFTER 12.1 



*END ' 



The last example points to several differences between the Edit COPY and the PCL COPY: The Edit COPY can only 
specify disk filenames; the PCL COPY can specify or imply devices (e.g., ME, DC, LT)and filenames, either singly or 
in combination as appropriate. Note that the specification iXZ/ME is possible and results in no ambiguity, though in 
this cose "DC/" must be specified or the file name may be written as 'ME'. A second difference Is that the PCL COPY 
TO ME, though It accepts keyed files, does not display the keys as sequence numbers as does Edit TY; it is function- 
ally the same as Edit TS in this respect. 

The output option K must be used to display keys (In addition to the record sequence numbers) in a format comparable 
to the Edit TY display. 
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The next example is designed simply to illustrate these differences as well as to further clarify the merging action 
of PC L COPY on keyed files. 

Example 17. Keyed-File Update and Display (Further Examples) 



IBUILD FIIA fe 

1.000 LINE 1 IN FILA© 
2.000 LINE 2 IN FILA© 
3.000 LINE 3 IN FILA © 
4.000 LINE 4 IN FILA © 
5.000 © 



_!_BUILD FILE,, 5, ,5 © 

Here the user requests a new file starting with sequence number .5 and incrementing by .5 also 

0.500 LINE 1 IN B © 
I. OOP LINE 2 IN B © 



1.500 LINE 3 IN B © 

2.000 LINE 4 IN B © 

2.500 LINE 5 IN B © 

3.000 LINE 6 IN B © 

3.500 LINE 7 IN B © 

4.000 © 
j_BUIIXi FILC,2,.75© 



and a new file starting at 2 and incrementing by .75. 

2.000 LINE 1 IN C © 

2.750 LINE 2 IN C © 

3.500 LINE 3 IN C © 

4.250 LINE 4 IN C ® 

5.000 LINE 5 IN C © 

5.750 LINE 6 IN C © 
6.500 © 
_!_COPY FILA.FILB.FILC TO DC /ME © 

He combines the three files on new disk file ME. 
ICOPY DC /ME © 

With PCL COPY he displays file ME ondevice ME. 



LINE 


1 


IN 


B 


LINE 


2 


IN 


B 


LINE 


3 


IN 


B 


LINE 


1 


IN 


C 


LINE 


5 


IN 


B 


LINE 


2 


IN 


C 


LINE 


6 


IN 


B 


LINE 


3 


IN 


C 


LINE 


4 


IN 


FILA 


LINE 


4 


IN 


C 


LINE 


5 


IN 


C 


LINE 


6 


IN 


C 



_!_EDIT HE © 
EDIT HERE 
*TY .5-6 © 



Then he displays it with Edit. 
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0.500 


LINE 


1 


IN B 


1.000 


LINE 


2 


IN B 


1.500 


LINE 


3 


IN B 


2.000 


LINE 


1 


IN C 


2.500 


LINE 


5 


IN B 


2.750 


LINE 


2 


IN C 


3.000 


LINE 


6 


IN B 


3.500 


LINE 


3 


IN C 


4.000 


LINE 


4 


IN FILA 


4.250 


LINE 


4 


IN C 


5.000 


LINE 


5 


IN C 


5.750 


LINE 


6 


IN C 


--EOF HIT AFTER 


5.75 



*END@ 



Not-e that the merging action of the multiple-file PCL COPY eliminates duplicately keyed records on 
file ME by successive replacement: record n from FILB replaces record n from FILA, and is in turn re- 
placed by record n {if any)from FILC. Only record 4.000 survives from FILA, for example. If the LN 
option had been used on output, all records in the three input files would have been kept, and the rec- 
ords in file ME would be assigned new keys. 



j_PCL © 

FCL POO HERE 

<LIST® 



Now he asks for a listing of current disk-file names, to see which are deletable. 



FILA 
FILB 
FILC 
LOPRIM 

m 

MODI 
M0D2 
PRIMES 
VPRIM 

<DELETE FILA, FILB, FILC, 'ME' ,M0D1,M0D2@ 
6 FILES DELETED 



Example 18. Building and Concatenating Unkeyed Files 



In this example, the user creates two unkeyed files using PCL COPY; in most real instances of file concatena- 
tion, however, the files are outputs of other processors, e.g., FORTRAN. The user copies the files in the 
desired order to a single new file. A display of the resultant file shows the ordering of records produced by a 
multiple unkeyed-file copy. This example also shows how to copy a file to the system line printer, (Note 
that permission for such use of central-site peripherals requires explicit installation authorization; the system 
carries a record of this authorization.) 



IPCL © 

FCL DOO HERE 



<_COPY ME TO A @ 

The user requests a copy of terminal input to file A. 
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i.lST LINE IN A @ 
^2ND LINE IN A © 
^3RD LINE IN A @ 
ATH LINE IN A © 
._ @F 

He enters input to new file A from the terminal. PCL prompts for input of each data line. An Escape F 
sequence ends the data input, i.e., indicates end-of-file. 



ICOPY ME TO B fe 
_^1ST LINE IN B © 
^2ND LINE IN B © 
_^3RD LINE IN B ® 
_^4TH LINE IN B© 
. ©F 



He enters input to new file B from the terminal. 



He copies files A and B in succession to form new file C, incidentally showing the syntax of explicit 
device identification (optional) in the cose of multiple-file specification. 

<_COPY C TO ME © 

He now copies the contents of file C to the terminal. 



1ST 


LINE 


IN 


A 


2ND 


LINE 


IN 


A 


3RD 


LINE 


IN 


A 


4TH 


LINE 


IN 


A 


1ST 


LINE 


IN 


B 


2ND 


LINE 


IN 


B 


3RD 


LINE 


IN 


B 


4TH 


LINE 


IN 


B 



<COPY A TO LP © 

He then asks PCL to print file A on the system printer. 

^DELETE A© 

1 FILES DELETED 
<END© 
I 



PCL 35 



5. USING LANGUAGE PROCESSORS 



INTRODUCTION 

The term "language processor" refers to a processor that processes a specific programming language. Such processing 
consists essentially of some form of translation of the source language to the internal language of the computer, or 
machine language. (This machine-language translation is also commonly referred to as "object code".) 

The most frequently used language processors available under CP-V in on-line modeare BASIC, Extended FORTRAN IV, 
ANS COBOL, Meta-Symbol, and APL. Although these processors are also available for botch-mode operations, this 
guide is limited to a description of their on-line usage. 

It is important at this point to distinguish between a programming language and the on-line command language asso- 
ciated with it. You use statements (i.e., sentences) of the programming language to form a program, whereas the 
commands ore used to control what is done to or with that program. This chapter is intended to illustrate elementary 
uses of the command languages. (Succeeding chapters cover increasingly complex usages.) Therefore, to understand 
the program content of any of the following examples, knowledge of the relevant programming languages is necessary. 

The following manuals contain descriptions of the language processors: 

BASIC/LN,OPS Reference Manual, 90 15 46. 
Extended FORTRAN IV/LN Reference Manual, 90 09 56 . 
Extended FORTRAN IV/OPS Reference Manual, 90 11 43. 
ANS COBOL/LN Reference Manual, 90 15 00. 
ANS COBOl/OPS Reference Manual, 90 15 01 . 
Meta-Symbol/LN,OPS Reference Manual, 90 09 52. 
APL/LN,OPS Reference Manual, 90 19 31. 

BASIC 

The CP-V BASIC processor is a compiler for a significantly extended and enhanced Xerox version of the standard 
BASIC language (Beglnner's^ll-Purpose Symbolic instruction Code), a mathematical language designed specifically 
for time-sharing usage. 

BASIC is particularly suited to small and medium scale computational applications. The outstanding advantage of 
BASIC is that it is easy to learn and simple to use. It is an ideal "starter" language, even though it does offer 
sophisticated problem-solving capabilities. 

The BASIC processor is called with the TEL command BASIC. The processor then prompts for either BASIC program 
statements or BASIC commands with a "greater than"(>) character. During program execution, it prompts for program- 
requested terminal input (if any) with a question mark (?). When you have finished using BASIC, you exit back to 
TEL by giving the SYSTEM command. 

Since BASIC includes a program-building and editing facility, a program file need not be built under EDIT (as is the 
general case for FORTRAN and Meta-Symbol programs), 

A useful Xerox enhancement of BASIC Is its capability for direct execution of individual statements. This allows you 
to operate BASIC in the "desk-calculator mode", without building a program; it also provides a powerful on-line de- 
bugging feature. These topics are discussed in a later section of this chapter. 

PROGRAM BUILDING, EDITING, AND EXECUTION 

Having called BASIC, you build a source program simply by entering BASIC program statements —each beginning 
with the required one to fivedigitstepnumber (see following example) — in response to the prompt character (>). 
Typing error corrections can be made before the line is released with the @, @X, or X controls as usual. Program 
statements entered in this fashion reside in an internal program-text area and constitute the current program. 
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The complel-e set of statements that are to constitute a given program need not be entered consecutively (e.g., 
BASIC commandsmayintervene)and need not be entered in a sequence corresponding to their step numbers. The step 
numbers of the individual statements completely control the logical ordering of the statements within the program, 
providing for automatic insertion, replacement, and deletion of single statements on the basis of relative step num- 
bers, as follows: 

• Insertion - A statement entered with a step number falling in numerical sequence between the step numbers 
of two previously entered statements is automatically inserted between those two statements. 

• Replacement - A statement entered with a step number matching the step number of a previously entered 
statement automatically replaces that previously entered statement. 

• Deletion - A step number followed Immediately by©, i.e., a "null statement", causes any previously 
entered statement having a matching step number to be deleted. 

{Explicit editing commands that can affect more than one statement are covered in a subsequent section.) 

After entering a program In this manner, you can have It compiled, error-checked, and executed (if no detectable 
errors exist) by issuing the RUN command. Syntax (i.e., language) errors, if any, will be reported by BASIC, and 
a prompt character (>) issued. You may at this point correct these errors, via statement insertion, replacement, or 
deletion as described above. Note that when terminal input is requested by your program during its execution, a 
question mark (?) is issued as a prompt character. 

Once a program has been tested and is known to be working correctly, you can request subsequent execution with 
the command FAST instead of RUN. FAST bypasses the checking of indices for subscripted variables. 

The following example illustrates three intrinsic —or built in — functions; DEG(x) - convert x from radians to 
degrees; ASN(x) - calculate arcsin of x, in radians; and ABS(x) - use absolute value of x. The first two, 
DEG and ASN, are specific CP-V additions to the standard BASIC language. 



Example 19. BASIC Program Building, Editing, and Execution 



_l_BAS IC © 




















The user calls the BASIC 
response to each prompt 


subsystem, and begins 
character. 


to 


build a 


program 


/ e 


ntering 


a BASIC statement in 


>10 

>30 

>40 


REM SAMPLE PROGRAM © 
REM $A IN STMT 20 IS 
$A = "COMPUTE ARCSINE 
PRINT $A © 
FOR I -\= 1 TO 5 © 


A STRING VARIABLE © 
OF X, IN DEGREES" © 


















After typing the minus-s 
echoed as \ , to erase It 


gn (or dash) character 
and continues. 


by 


mistake 


- I.e., 


by 


forge tt 


'ng to shift — he 


uses a I©, 


>50 INPUT X © 

>60 PRINT DEG (ASN(X)) ' 

>70 NEXT I © 

>80 END ® 

>RUN © 


' = ARCSIN OF "X © 


















He enters the final state 
command. 


ment (step 80) and then 


requests compilation 


and execution with the 


RUN 
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16:18 



NOV 09 RUNIDAA. 



COMPUTE ARC SINE OF X. IN DEGREES 
1.001 © 

5.72958E-02 = ARCSIN OF l.OOOOOE-03 
1.707 © 

44.9913 = ARCSIN OF .707000 
1-0.707 ® 

-44.9913 = ARCSIN OF -.707000 
13.246 ® 

He now tries a value that is much too large. 

60 ASN-ACS ARC ERROR 

He gets on error message, and a return to editing/command level (where he will enter additional 
program statements for detecting the out-of-range condition). 

^55 IF ABS(X) > 1 THEN 90 © 

>90 PRINT X; "VALUE OUT OF RANGE" @ 

>95 GOTO 70 @ 

>RUN © 

After inserting steps 55, 90, and 95, he tests again. 

16:27 NOV 09 RUNIDAA... 

COMPUTE ARC SINE OF X, IN DEGREES 
11.5 @ 
1.50000 VALUE OUT OF RANGE 



.fe^> 



He gets the desired result on the exception condition, and terminates execution. 



PROGRAM SAVING, LOADING, AND RENAMING 

A program created under BASIC can be saved on a permanent file with the SAVE command, and can be subsequently 
reloaded for execution with the LOAD command. The command form SAVE ON fi lename (where filename does 
not name an already-existing file) creates a file named as specified, on which your current program is copied. 
If, on the other hand, you use the command SAVE OVER filename , your current program is copied on the 
named file. If the specified name is not that of an already existing file, a new permanent file is created. 

To retrieve a saved program, you use the command LOAD filename. In general, the LOAD command causes 
loading of the named program into the program-text area, but the results of this loading will depend upon the 
state of this area at the time the command is given. If the program-text area is empty, i.e., no current pro- 
gram has been entered or loaded during the current BASIC session, the saved program simply becomes the current 
program . 

If, however, the program -text area Is not empty at the time of the LOAD, the result depends on the current 
operating mode, or status. If the status Is not "running". I.e., not execution mode, then the statements of the 
saved program are "woven" into the current program, on the basis of step numbers. This "weaving" process is 
analogous to a linked-file PCL COPY f„f„ to f„. 

The result is not usually the one desired; it can be circumvented by using the command CLEAR, prior to the 
LOAD. The CLEAR command clears the contents of the program-text area, i.e., the current program. This 
command may be given at any time. If BASIC Is in execution mode, or "running", the program-text area 
Is automatically clear prior to loading. The operating mode can be ascertained at any time by use of the 
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STATUS command. Use it frequently to become familiar with mode transitions. (The responses to STATUS are 
EDITING, COMPILING, or RUNNING.) 

ADDITIONAL EDITING FACIUTIES 

Two BASIC editing commands that facilitate the display and deletion of current-program statements are LIST and 
DELETE, respectively. These two commands hove identical formats; LIST Is shown: 

LIST [s, [-S2]][.S3 [-s^]...] 
where s. is a step number. 



If one or more pairs of dash -separated step numbers (s]-s2, etc.) are specified, the corresponding range(s) of state- 
ments are listed or deleted. If only S] {/S3, etc.) is specified, only the corresponding individual statement(s) 
Is listed or deleted. If no step number Is specified In a LIST command, the entire current program Is listed. 
Note: The command form DELETE © is Ignored; to delete the entire program you must use the CLEAR command. 

Example 20. Program Modification, Saving, and Reloading 



(This example takes up at the point at which we left Example 19.) 



>io e 

>15© 



The user deletes the two REM statements (which are not necessary to the program's operation) and, 
below, requests a display (LIST) of the current program, 

>LIST @ 

20 $A = "COMPUTE ARCSIN OF X. IN DEGREES" 

30 PRINT $A 

40 FOR I = 1 TO 5 

50 INPUT X 

55 IF ABS(X) > I THEN 90 

60 PRINT PEG (ASN(X)) " = ARCSIN OF "X 

70 NEXT I 

80 END 

90 PRINT X; "VALUE OUT OF RANGE" 

95 GOTO 70 

^25 REM NEXT STMT SHOWS STRING CONCATENATION (+) © 

^30 PRINT $A + ", TESTING FOR OUT-OF-RANGE VALUES" © 

>^40 FOR I =1 TO 2 © 

^LIST 20-40 g 

He inserts step 25, replaces steps 30 and 40, and lists steps 20 through 40 to observe the results. 

20 $A = "COMPUTE ARCSIN OF X. IN DEGREES" 

25 REM NEXT STMT SHOWS STRING CONCATENATION (+) 

30 PRINT $A + ", TESTING FOR OUT-OF-RANGE VALUES" 

40 FOR I = 1 TO 2 

>_RUN © 

14:53 NOV 10 RUNIDAA... 

COMPUTE ARCSIN OF X, IN DEGREES. TESTING FOR OUT-OF-RANGE VALUES 

2.253877 © 

14.7071 = ARCSIN OF .253877 

?_-. 00000009 © 

-5.15662E-06 = ARCSIN OF -9.00000E-08 

80 HALT 
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>_45 PRINT "ENTER SINE VALUE, PLEASE" © 

He inserts a final modification, then saves the program on new permanent file ARCSINE. 



>SAVE OVER ARCSINE © 

> CLEAR ® 

>_LOAD ARCSINE © 

After clearing the program-text area, he loads the saved copy back in, and tries it once more (note 
the new current-program name when he executes it again). 



>RUN K 

15:04 NOV 10 ARCSINE... 

COMPUTE ARCSIN OF X. IN DEGREES, TESTING FOR OUT-OF-RANGE VALUES 

ENTER SINE VALUE, PLEASE 

?^.0Ol © 

5.72958E-02 = ARCSIN OF I.OOOOOE-03 
ENTER SINE VALUE, PLEASE 
2.002 © 

.114592 = ARCSIN OF 2.00000E-03 



80 HALT 



TEMPORARY SAVING, RENAMING, AND RENUMBERING OF CURRENT PROGRAM 

The FILE and NAME commands, used in conjunction with CLEAR and LOAD, provide a convenient short-cut 
means of temporarily saving the current program, e.g., for "backup" purposes prior to extensive modification, 
and of renaming the current program for the execution -report heading. (You will have noticed a default pro- 
gram name, i.e., RUNIDAA, in the previous examples — this default name varies from session to session.) 

The command FILE simply causes the current program to be copied onto a temporary file (known as the "runfile" in 
other Xerox operating -system environments). This copy of the program can be explicitly named by using the com- 
mand NAME newname prior to the FILE command. If the NAME command is not used (or no name is specified) the 
default program name applies. At any point after a program has been FILEd, a CLEAR and then a LOAD, with no 
filename, reestablishes the field copy as the current program. The copy will remain on file during the whole termi- 
nal session until another program is FILEd over it. 

When using FILE and LOAD (no name), it is important to remember that these commands always refer to the last 
runfile referred to with a NAME command, if one or more have been issued. If not, the default runfile name is 
"current". (The defaultVunfile name can be reestablished with a null NAME command, i.e., simply NAME® .) 
Multiple runfiles can exist concurrently, resulting from multiple pairs of NAME newname and FILE commands hoving 
been issued; they can be selectively retrieved by a LOAD name command. Note: if NAME newname is used, 
newnome may not also be used as the name of a permanent file during the same terminal session. 

The command sequence for changing the execution name of a current program would be 



>NAME newname 

>FILE 

>CLEAR 

>LOAD 
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Note fhat in this instance the CLEAR command that precedes the LOAD is functionally unnecessary since the 
current program and the filed program are identical, but it is included because of resultant savings in proces- 
sing time and space. 

At any time you can cause your current program to be automatically renumbered by giving a RENUMBER (or 
REN) command. Its format Is 



REN [UMBER] [s, [,53 [,i]]l 



where 

s is the initial new step number (default value = 100). 

s„ is the old step number at which to begin renumbering (default value = 1, i.e., "first statement"). 

f IS the increment by which successive new step numbers are to be increased (default value = 10). 

(For example, REN alone is equivalent to RENUMBER 100, 1, 10; REN, 10 equivalent to RENUMBER 100, 10, 10; 
REN,, 5 to RENUMBER 100, 1, 5.) 

This command allows you to clean up, or regularize, the numbering of your program with full control over the 
starting value, the point in the program at which to begin, and the step-value spacing. During the renumbering 
process, proper replacements are made for all step-number references, i.e., in GOTO statements, THEN clauses, 
etc., within the program. If the renumbered program was loaded from a permanent file, simply resaving it over 
the same file will make the renumbering "permanent". 



Example 21. Temporary Filing, Reloading, and Renaming 



(Continued from previous example. 



>FILE @ 



The user files the current program (ARCSINE) on a temporary "runfile", under the default "runfile" 
name —whatever that is. 



>_CLEAR S 

He then clears the current program, to play safe. 

^LOAD VPRIM © 
^RUN© 

He loads and executes the program VPRIM, previously built under Edit. (If it were now to be resaved 
over VPRIM, that file would no longer be keyed, as BASIC is not a keyed-file oriented processor - 
BASIC step numbers are part of the file records, not record keys.) 
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18:30 NOV 12 VPRIM. . . 

ENTER LOWKR BOUND TOR PRIMES 
2100 ® 

ENTER UPPER BOUND FOR PRIMES 
1250 © 
101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 

193 197 199 211 223 227 229 233 239 241 
180 HALT 
^STATUS © 

Following a successful execution of VPRIM, he requests the current status of BASIC. 

RUNNING 
>_LOAD ® 

He now loads the default-named temporary file, without a preceding CLEAR, since clearing is 
automatic in execution mode. 

>^RUN ® 

18:05 NOV 12 RUNIDAA... 

COMPUTE ARCSIN OF X. IN DEGREES. TESTING FOR OUT-OF-RANGE VALUES 

ENTER SINE VALUE. PLEASE 

>NAME ARC © 

He breaks off execution, names another temporary "runfile", and (below) files the current 
program on it. 

>^FILE ® 
> CLEAR @ 



Note here that LOAD with no name specified will refer to the last-named "runfile" (if any 
otherwise to the default-named "runfile"). 

>_RUN © 

18:09 NOV 12 ARC... 

COMPUTE ARCSIN OF X. IN DEGREES. TESTING FOR OUT-OF-RANGE VALUES 

ENTER SINE VALUE, PLEASE 

.?.4e 

23.5782 = ARCSIN OF X 
ENTER SINE VALUE, PLEASE 

^SYS © 

This command, SYS, causes an exit from BASIC and a return to TEL. 

! OFF © 



DIRECT STATEMENT EXECUTION AND DESK-CALCULATOR MODE 

Direct statements are BASIC statements entered without a step number either in editing or execution mode. 
They can be executed either with or without a current program — the latter being called "desk -calculator 
mode". In normal execution mode, i.e., with a current program, direct statements are used for on-line de- 
bugging, or program verification. 
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Direct statements are recognized as such by BASIC and are executed (if possible) immediately. The most commonly 
used forms of direct statements in editing or desk-calculator mode are PRINT statements containing an arithmetic ex- 
pression, and one or more LET statements followed by a PRINT statement. For on-line debugging, GOTO, LET, and 
PRINT are commonly used, singly or in combination, referring to variables and statements in the current program. 



Most BASIC statements can be issued as direct statements; the few exceptions, e.g., FOR, NEXT, ore statements 
that cannot be expected to "execute" by themselves in any meaningful way. 



A further enhancement of the direct -statement execution capability is the EXECUTE (or EXE) command, which 
is provided specifically for convenience in on-line debugging and verification. The command format is 



EXE[CUTE][s,][-sJ 



where s. and s. refer to step numbers in the current program. 

In either editing or execution mode, a step number reference causes one statement or a range of statements of the 
current program to be executed. Note that if a range is specified, the last statement in the range, s-, is not 
executed. (You can achieve the same effect by combinations of direct statements, but the EXECUTE command is 
significantly faster and more convenient. ) 



Example 22. Use of Direct Statements — "Desk -Calculator Mode" 



_!_BASIC !£ 

>PRINT DEG(ASN(.5)) 



The user calls BASIC and immediately enters a direct statement, i.e., one with no line number. 
Note that (1) there is no current program, and (2) the user doesn't have to be in execution mode. 



30.0000 
>_PRINT DEG(ASN(1.1)) @ 

Now he tries one that should result in an error comment. 

ASW-ACS ARG ERROR 
>LET X=SQR(2)/2 ® 

Then he tries a sequence of two statements with a common variable. 

2PRINT DEG(ASN(X)) © 
45.0000 
>_SYS © 

_!_OFF © 

-accounting summary- 
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ABBREVIATIONS OF BASIC COMMAND VERBS 

All of the BASIC command verbs may be shortened to the first three letters, i.e., CLE(ar), DEL(ete), LOA(d), etc. 
In addition, you may use the following short forms of the SAVE command: SAV N for SAVE ON, and SAV VER for 
SAVE OVER. 

Another direct-statement execution example follows, illustrating EXECUTE command usage. 



Example 23. Using the EXECUTE Command 



IBASIC © 

^LOAD VPRIM © 

>1 PRINT 'P='P;'I='I; 'Q='Q;'S='S © 

The user inserts a statement that facilitates inspection of variable values as he executes selected 
portions of it below. 

>LIST © 

1 PRINT 'P='F;'I='I;'Q='Q;'S='S 

10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

20 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

30 INPUT L 

40 PRINT 'ENTER UPPER BOUND FOR PRIMES' 



50 INPUT V 

60 P=l 

70 P=P+4.S=0 

80 FOR 1=5 TO SQR(P)+L STEP 2 

90 Q=INT (P/I) 

100 IF Q*I=P THEN 150 

110 NEXT I 

120 IF P<L THEN 150 

130 IF P>U THEN 180 

140 PRINT P' 'TAE(O) 

150 IF S=l THEN 70 

160 S=l. P=P+2 

170 GOTO 80 

180 END 

>RUN © 

13:02 NOV 18 VPRIM... 



P=0 1= 


'0 Q=0 


S=0 


FOR 




ENTER 


LOWER 


BOUND 


PRIMES 


X17© 
ENTER 


UPPER 


BOUND 


FOR 


PRIMES 



?17 © 








12 








180 HALT 








>EXE 1 © 








P= 19 1= 5 = 


3 


S= 


1 


>EXE 70-120 © 








120 -EXEC- 


HALT 




>_EXE 1 © 








P= 23 1= 5 Q= 


4 


S= 






^LET U=50 © 

Here the user enters a direct statement to change the upper-bound parameter. 

>^EXE 110-150 © 
23 

150 -EXEC- HALT 
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>,EXE 


150- 


180 


© 




29 


31 37 


41 


43 


47 




180 


-EXEC- 


HALT 


>SYS 


® 








mPF 


® 








-accounting summary- 



FORTRAN IV (F0RT4J 

The Extended FORTRAN IV processor Is a mathematical-language compiler that processes an extended version of 
the standard FORTRAN IV language. It is appropriate to the solution of medium-to-large scale computational 
problems, and offers full file input/output capabilities. Unlike BASIC — compije-ond-execute processor — it 
produces scvoble and reusable object programs, eliminating the need to recompile frequently used programs. 

A related facility, the FORTRAN Debug Package (FDP), permits on-line debugging during program development and 
checkout. Use of FDP is covered In Chapter 7, "Debugging User Programs". FORT4 accepts source-program input 
either from a previously built source file or directly from the user's terminal, a line at a time. Normally, the 
former method Is employed, the file having been built with the Edit processor. 

The line-at-a-time method has an advantage for novice FORTRAN users in that "conversational" syntax-error diag- 
nostic comments are issued immediately following input of the line to which they refer, an effective learning device. 
(When using this method, a source file can be preserved for subsequent modification and recompi lotion by means of 
the special compilation option SO, and an appropriate !SET command, as shown In a subsequent example.) 

The standard outputs of the compilation process are the compiled object program, called the relocatable object 
module (ROM), and error comments. A listing of the source program may be (and generally Is) requested, with the 
LS compilation option, described below. 

CONTROLLING THE COMPILATION PROCESS 

FORT4 is called with the TEL command FORT4. The format of this command is: 



'f^^^^KnBvER Wt'"'0] 



where 

source specifies a disk file containing the source program. 

ME indicates source input from the user's terminal (the default assumption for this field). 

rom specifies the disk file that is to receive the object program (the default temporary file name 

is "$"). 

list specifies the destination of source-listing output: either a disk file (fid), the terminal (ME), or 

central-site line printer (LP) — no default assumption Is made. 

Note that the ON or OVER qualifier refers only to the rom file, but one of the two must be given if either rom or 
list Is specified. For example: FORT4 ME ON ,LISTFIL. ~ 

This command, then, serves to call FORT4, Identify the input source, and direct the compiler outputs. 

Note that you can direct the compiler outputs prior to giving the FORT4 command with the I OUTPUT, ILIST, and 
[COMMENT commands (the latter allows a separation of source-l isting and error-commentary destination). If the 
OUTPUT command is used, the default value for the rom given above does not apply. 
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After the FORT4 command, the processor responds with the question OPTIONS>, at which point you may enter one or 
more compilation options. These control the compilation process and are used primarily to request optional outputs or 
suppress standard outputs. The options controlling listing of outputs are: 

LS - Produce source-program listing and full compilation summary. 

LO - Produce source- and object-program listing, and full compilation summary. 

PS - Produce partial instead of full compilation summary (default option). 

NS - Suppress compilation summary. 

Note that if none of the above are specified, a partial summary only Is produced, as If the PS option were specified. 
The PS or NS option can be used in conjunction with LS or LO, or NS alone may be specified (no listing, no summary). 
If you use the LS or LO option, a destination for this output must be specified In the F0RT4 command. 

There are many other options, mostly having to do with the nature of the source input and the object output. 
These ore described In the CP-V/TS Reference Manual, 90 09 07, and the FORTRAN IV/OPS Reference Man- 
ual, 90 11 43. 

If you enter source lines directly from the terminal (I.e., FORT4 ME . . . ), you may want to use the SO option, which 
requests that the source program be reproduced as an output; in this case you must assign this output (the M:SO DCB) 
toafllewltha ISETcommand (see Chapter 11, "DCB Assignments"). Several examples are g iven below. 

Following a successful compilation, link-loading and execution of the resulting object program can be requested with 
the IRUN command. This command, as well as the related ILINK and ISTART commands are described In Chapter 6, 
"Loading and Executing Object Programs". Simple uses of !RUN are shown in the following examples. 

In the following example, the user employs Edit to create a file, INPUT, containing the source program. Note that the 
source lines contain a tab character: for FORT4, only one tab per line Is accepted, and its value is fixed by the com- 
piler as column /(regardless of specified setting). The example program computes the length of a three-dimensional 
vector, D, for Input values of X, Y, and Z, Execution-time input to the program is Initially from file DATA; input 
is terminated by a zero value for X. Output is initially directed to the terminal. 

The user then decides to execute again with new X, Y, and Z values from the terminal. Accordingly, he changes 
the DCB assignments for FORTRAN I/O units 5 and 6 so that data input is from the terminal and program output goes 
to the disk file VALUES, To examine this output, he Issues a ICOPYcommand to copy this file to the terminal. 



Example 24. Compiling and Executing FORTRAN Input from a File 



ITABS 7 © 




The 


user sets a tab value of 7, so that be can see the tab effect as he builds the file. 


IBUILD INPUT © 




1.000 


© 


WRITE <6,100) @ 


2.000 


10© 


READ (5,200) X,Y,Z © 


3.000 


© 


IF (X) 20,50,20 © 


4.000 


20© 


D = SQRT(X**2+Y**2+Z**2) ® 


5.000 


(Tfifii 


WRITE (6,300)X,Y,Z,D © 


6.000 


.© 


GO TO 10 © 


7.000 


50 © 


STOP © 


8.000 


100 © 


FORMAT (7X,1HX,11X,1HY,HX,1HZ,11X,1HD) © 


9.000 


200 © 


FORMAT (3E) © 


10.000 


300 © 


FORMAT (4(1X,E11.3)) © 


11.000 


.© 


END © 


12.000 


© 




He 


Duiids a 


file of source input, named INPUT. 
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_!_BUILD DATA© 

1.000 1.0,2.0,3.0 © 
2.000 1.0,1.0,1.0 @ 
3.000 0.0© 
4.000 © 

He builds a program-data file. 

ICOMMENT ON ME @ 

and requests error commentary at the terminal. 

J_F0RT4 INPUT ON BIN © 

He asks for a compilation of INPUT, with ROM output on BIN. 

EXT. FORTRAN IV. VERS ION POO 
OPTIONS > © 

and accepts the default option, partial summary. 



I: 



WRITE (6.100) 



II: 



END 



HIGHEST ERROR SEVERITY: (NO ERRORS) 

The partial summary prints at the terminal. 

ISET F:5 /DATA; IN© 

The user assigns the file DATA to the F:5 DCB, and defines it as an input file. (This is a "file 
assignment". ) 

ISET F : 6 UC © 

He assigns the user's terminal to the F:6 DCB, via the operational label UC. (This is a "device 
assignment".) 



! RUN © 



He requests a run, i.e., link-load and execution, of the program. Since the RUN command assumes 
as its input the results of the latest compilation or assembly if no input file is specified, he does not 
need to specify BIN. 



LINKING $ 
PI ASSOCIATED 



The loader's messages print. 



X 


Y 


Z 


D 


.lOOE+OI 


.200E+01 


.300E+01 


.374E+01 


.lOOE+OI 


.lOOE+OI 


.lOOE+OI 


.173E+01 



"STOP^- 

Then the program's output appears, and a normal progrom-halt is indicated. 

J_SET F : 5 UC © 

The user resets the input unit to the terminal 
_!_SET F:6 /OUTPUT; OUT© 

and the output unit to a file, named OUTPUT. 
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J.RUN BIN @ 

He reruns, this time specifying the ROM name (not actually required In this case, as explained 
above). 

LINKING BIN 
Pi ASSOCIATED 
14,4,5.5,6.6 © 
10.0 @ 

The program-input-request prompt Is given, and the user enters a set of values and a zero value to 
indicate end of data. 

"STOP* 

A normal program halt is indicated. 

|_COPY OUTPUT © 

The user requests a copy of the output file to the terminal. 

X Y Z D 

.440Et0l .550E+01 .660E+01 .965E+01 



The next example shows a very simple program entered directly from the terminal. The user requests the source pro- 
gram to be reproduced (SO), and uses a !SET command to assign a source-output file, SOURCE. He also uses the 
ISET command to assign FORTRAN unit 6, the program output, to the terminal. 



Example 25. Submitting Terminal Input for FORTRAN Compilation 



ISET M:SO /SOURCE © 

The user sets the DCB for source output produced by the compiler, M:SO, to the file SOURCE. Here, 
since he doesnot specify a file function (e.g., IN, OUT), OUT Is assumed by default. 

1©C\.© 

This sequence will cause the FORT4 prompt character (>) to be excluded as part of the input line 
when tabbing. The backslash prints automatically as a result of the © C sequence. 

_!_F0RT4 ME © 

He asks for a compilation of direct terminal input. 

EXT. FORTRAN IV. VERSION POO 
OPT IONS > N S , SO @ 

He suppresses the partial summary (NS), and requests source output (SO). 

^C THIS EXAMPLE ILLUSTRATES HOW SOURCE LINES ARE ENTERED© 

>^C DIRECTLY FROM THE TERMINAL, AND HOW A LINE IS CONTINUED. © 

>©■ WRITE (6,100) © 

>IOOS' FORMAT (IX, : © 

>_ C25HTHIS IS A CONTINUED LINE.)© 

^©5, END © 

FORTRAN prompts for source input with >. Note that the C In the fifth line is In column 6, the rest 
following a tab starting in column 7. (The user assumes that the tab setting of 7 from the previous 
example Is still In effect.) 
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l@cV_@ 

The user turns off the tab relative mode. 
j_SET F:6 UC © 

He sets the output unit to the terminal (operational label UC), 

_[_RUN © 

and requests a run. 

LINKING $ 
PI ASSOCIATED 
THIS IS A CONTINUED LINE. 
*STOP^- 

_!_COPY SOURCE TO ME © 

He displays the reproduced source file. 

C THIS EXAMPLE ILLUSTRATES HOW SOURCE LINES ARE ENTERED 
C DIRECTLY FROM THE TERMINAL, AND HOW A LINE IS CONTINUED. 

WRITE (6,100) 
100 FORMAT (IX. 

C25HTHIS IS A CONTINUED LINE.) 
END 

Note that the "to be continued" marker (:) in the fourth line has been stripped off by F0RT4. 

XOFF @ 

-accounting summary- 



COBOL 

COBOL (COmmon Business Oriented Language) is a language that is especially efficient in the processing of business 
problems. Such problems typically involve relatively little algebraic or logical processing. Instead, they most often 
manipulate large files of basically similar records in a relatively simple way. This means that COBOL mainly em- 
phasizes the description and handling of data items and input/output records. 

The COBOL compiler is called from an on-line terminal by the following command: 
COBOL[sp][°I^g^[rom][,list]] 



sp specifies a source program and may be either a file identification (fid) or the terminal identification (ME). 
If no source file is specified, TEL assumes input is from the file/device currently assigned to the M:SI DCB. 
If the M:SI DCB is not assigned, TEL expects input to come from the terminal (ME). (Note that on-line 
DCB assignments are made explicitly by the SET command and implicitly by the COBOL command. Once 
set, DCB assignments remain in effect until reassignment by subsequent SET commands or specified COBOL 
options except for M:SI, which is reset at each job step.) 

ON indicates that ROM output is to be on a new file. 

OVER indicates that ROM output is to be over an existing file or on a new file. 



COBOL 
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rom specifies that the relocatable object module produced by compilation is to be directed to a specific 

file (fid). If no ROM is specified and no previous LIST command has been issued, no listing output is pro- 
duced (list is assigned Implicitly to the M:LO DCB) . 

list specifies that listing output Is to go to a file (fid), a line printer (LP), or the terminal (ME). If list is 

not specified, TEL assumes that the listing output is to go to the file/device currently assigned to the 
M:LO DCB. If the M:LO DCB is not assigned, TEL produces no listing output. 

When the compiler is entered, it sends a request for options to the terminal. 

OPTIONS? 

If no options are desired, a carriage return may be entered following the request. This initiates the compilation. 

If compilation options are desired, the word COBOL must be entered followed by the codes for the desired options. 
These codes are separated by commas and terminated by a carriage return or line feed character which initiates the 
compilation. A few of the options that are available are 

GO — Specifies that a load-and-go copy of the object program Is to be written via M:GO. 

LO — Requests an object program listing via M:LO. 

LS — Requests a source program listing via M:LO. 

SO — Requests source output via M:SO. 

Example 26 shows how to build and execute a COBOL program using the COBOL compiler. 



Example 


26. Building and Executing a 


COBOL Program 












_!_TABS 9,13 @ 
















The user sets the simulated tab 
character will print in column 


stops for his term 
1 of his terminal, 


na! to columns 9 and 
COBOLwilllnterpret 


13. Since the COBOL prompt 
these tabs as being setinS and 12. 


_!_SET 


M:SO DC /SOURCE® 
















The user wants the source output file (SO) to be 


named SOURCE. 










J^COBOL ME ON ROM @ 
















The user calls the COBOL corr 


pller and specifies thot source input is 


to be 


read from the 


termlna 




COO COBOL 
OPTIONS? 
















The compiler identifies Itself and requests compi 


ler options. 










$COBOL GO, SO @ 
















The user enters a COBOL cont 
copy of the object program. 


rol command, specifying that he wants 


source output and c 


load-and-go 


S 
$ 

s 
i 
i 
i 


IDENTIFICATION DIVISION 
PROG RAM- ID. SIMPLE. @ 
DATA DIVISION. @ 
PROCEDURE DIVISION. @ 
PARA-1. DISPLAY 'A.O.K' 
STOP RUN.© 


UPON PR INTER. @ 
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COBOL 



The programmer enters a COBOL program and then enters ESCAPE F to indicate that the program is ready 
for compilation. The program is compiled and the following diagnostic message is output: 

**-*NUMBER OF DIAGNOSTIC MESSAGES 0***HIGHEST 



SEVERITY LEVEL O**- 

_[RUN ROM(NL)(NP) OVER LMN; BLIB : .COBLIB @ 

Since there were no errors in the program, the user decides to execute it. The RUN command specifies 
that an executable load module named LMN is to be built using the object module named ROM, no public 
libraries or core libraries are to be searched, the BLIB; library in the COBLIB account is to be used to 
satisfy any external references, and the load module is to be executed. 

LINKING ROM 



LINKING BLIB: 



A. O.K. 



The message A. O.K. is printed on the terminal because the terminal is the default LO device when 
COBOL is run in the on-line mode. 



META-SYMBOL [META] 

Meta-Symbol is a macro-assembler that processes an assembly language. Symbol, (which is a symbolic representation 
of the machine language) and macro-procedure language, Meta-Symbol {which is a powerful logical extension of 
the assembly language). Assembly language is the "lowest level" language normally used for programming. 

The advantage of Meta-Symbol programming is the maximum speed and efficiency that is possible in the resultant 
object programs. Its disadvantage is that it is more time-consuming to learn and to use than "higher-level" lan- 
guages such as FORTRAN. 

Also available is an extensive and sophisticated debugging processor. Delta, designed specifical ly — though not 
exclusively — for debugging Meta-Symbol object programs. Its use is covered In Chapter 7 and In Example 47. 

The META processor Is called by the TEL command META, There are many examples throughout the following chap- 
ters that illustrate the use of META: 

Example 38 shows an assembly and execution. 

Example 43 shows use of OUTPUT, LIST, and COMMENT commands. 

Example 44 shows use of SET commands before calling META. 

Example 45 shows discontinuation and resumption of output while assembling with META. 

These examples all Illustrate the use of META to assemble from a source file. META can also be used to assemble 
source lines directly from the terminal, as shown In the following example. Unlike the FORT4 processor however, 
diagnostics are not produced until after the END statement Is received. ("Diagnostic" Is a general term for the 
warning and error commentaries resulting from the error checking performed by the assembler.) 
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The format of the META command is 

«TA[»r][ovERMt''''']] 

where 

source specifies a disk file containing the source program. 

ME indicates source input from the terminal (the default assumption for this field). 

rom specifies the disk file that is to receive the object program (the default temporary-file name is "$"). 

list specifies the destination of the source-program listing: either a disk file (fid), the terminal (ME), or 

the line printer (LP) — ME is assumed by default but no listing output is produced (unless ILIST is issued 
during a subsequent interruption of the assembly). 

Note that the ON or OVER qualifier refers only to the rom file, but one of the two must be given if either rom or 
list is specified. 

The effect of the META command variable field is to assign the M:SI (source input) DCB, the M:GO ("go", or object 
output) DCB, and the M:LO (listing output) DCB to the source, rom, and list specifications, or to their defaults. 
Note also that if these DCBs have been assigned previously in the session, either by an OUTPUT, LIST, FORT4, or 
prior META command, the corresponding default values given above do not apply. (The effect of the COMMENT 
command is to explicitly assign the M:DO (diagnostic output) DCB; i.e., to specify a destination for diagnostics 
separate from the source listing, if any.) 

After the META command is given, the processor asks for assembly options: WITH>. A description of these options 
for on-line usage can be found in the CP-V/TS Reference Manual, 90 09 07, Chapter 4. The only options we need 
mention here are SO (source output), which functions exactly as In a FORTRAN compilation — shown in the previous 
section —and SD (symbolic-debugging), which is covered In Chapter 7. Note that source- listing output Is implic- 
itly requested or suppressed by the list parameter In the META command, unless a LIST command Is given before the 
META command. 

Note also that the format of the assembler source listing is not very suitable for display at the terminal, and Is best 
directed to the line printer (LP), or omitted. Comments go to the terminal (by default) in either case. 



Example 27. Using META to Assemble Terminal Input 



j_META ME © 

The user asks for an assembly of terminal Input, with no source listing. 

WITH> @ 

He doesn't request any assembly options and, below, begins to type In the source lines following 
META's prompt character (>). (A tab setting and tab characters could be used to achieve the desired 
starting columns as shown in later examples.) 

^*THIS EXAMPLE ILLUSTRATES DIRECT INPUT FROM TERMINAL, g: 

>*IT ALSO SHOWS HOW TO CONTINUE A LINE . © 

^ SYSTEM BPM @ 

>_ SYSTEM SIG7 @ 

^ REF M:UC @ 

>_START M:WRITE M:UC,(BUF,M; (CONTINUED LINE) ® 
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2i ES), (SIZE, 26) (CONTINUATION) @ 

> M:EXIT @ 

^MES TEXT 'EXAMPLE OF CONT' , ; © 

>_ ' INUED LINE . ' © 

> END START ® 

*N0 UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL: 

* NO ERROR LINES 

!RUN (NP)® 



Here the library-search option NP is used to suppress association of the default public library, PI, by 
the loader, as it is only required for FORTRAN programs. 



LINKING $ 
EXAMPLE OF CONTINUED LINE. 



The program executes, printing its output, and control returns to TEL. 



!OFF : 



APL 

APL is an acronym for A^ Programming Language, the language invented by Kenneth Iverson. APL is an interpretive, 
problem-solving language. As an interpretive language, APL does not wait until a program is completed to compile 
it into object code and execute it; instead, APL interprets each line of input as it is entered to produce code that 
is immediately executed. As a problem-solving language, APL requires minimal computer programming knowledge; 
a problem is entered into the computer and an answer is received, all in the APL language. 

APL operates in three modes. In the Desk Calculator Mode, expressions may be entered for immediate execution. 
In the Function Definition Mode, expressions may be combined into programs and stored for future use. In the 
Function Editing Mode, functions that were previously stored may be modiPed. 

The APL examples in this manual are written for operation on a standard 2741 APL terminal (that is, a 2741 terminal 
with an APL typeball). See Appendix B of the Xerox APl/LN, OPS Reference Manual, 90 19 31, for a description 
of how to use APL with other terminals. 

Example 28 provides an example of logging on to CP-V with an APL terminal, calling APL, using APL in the Desk 
Calculator Mode, and logging off. In Example 29, APL is used in the Function Definition Mode and the Function 
Editing Mode. 



Example 28. Using APL in the Desk Calculator Mode 



*© 










Th 


e user identifies th 


e 2741 terminal to the 


system . 


XEROX 
ON AT 
LOGON 


CP-V AT YOUR 
10:16 MAY 16. 
PLEASE: 2466, 


SERVICE 

•73 
SMITH @ 






Th 


e CP-V system identifies itself 


and the user logs on. 


10:17 


05/16/73 2U66 


50-37 


[1] 




oAPL © 
APL-03/1S/73 
CLEAR WS 









APL 53 



Note t-hat TEL prompt's with a <> character at an APL terminal . The user calls APL and APL 
acknowledges control and prints the workspace status. 

i*55 + 2095t7i+ @ 



2625 

The user begins using APL in the Desk Calculator Mode by adding three numbers together. Note that 
APL provides the indentation but does not use a prompt character. 

L05*,5 © 
UNDEFINED 

L05*0. 5 



The user then unsuccessfully attempts to take the square root of 105. 

105*. 5 © 
10.24695077 

The square root operation is now successful. 

6 15 a 1+95 *2 © 
36 225 64 245025 

In the above operation, the user requests the square of the numbers 6, 15, 8, and 495. 
)OFF @ 



CPU 



.0069 CON= :08 INT 



13 CHG = 



The user logs off from both APL and CP-V. If the command had been )OFF HOLD, the user would have 
been logged off from APL and control would have returned to TEL. 



Example 29. Using APL in the Function Definition and Function Editing Modes 


*e 


XEBOX CP-V AT YOUR SERVICE 


ON AT 09 :44 MAY 17, '73 


LOGON PLEASE: 3 5 6101 .i^ByS © 


09:45 05/17/73 356101 22-39 [1] 


"APL © 


4PL-03/16/73 


CLEAR WS 


The user logs on and calls the APL processor. 


HCi-A HYP B © 


He decides to define a function that will calculate the length of the hypotenuse of a right triangle, 


given the lengths of the two sides. The del (v) character signals function definition and is followed 


by the function name. 


[1] C *■ ( (/4*2)+S*2)*0.5 © 


[2] V © 
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The system responds with [l]and waits for the first program line. Each successive line is also numbered 
until the routine is closed by another V. (The user could have closed the function by placing the V char- 
acter at the end of line 1 .) 

3 HYP 4 © 



9 2 HYP 
9 2.0489 0005 



The user tries a few examples. 



7/1 GEOMETRY B © 

[1] 'FUNCTION WRITTEN BY M. 

[2] 'GIVEN A RECTANGLE OF ' 

[3] 'SIZE ' ;Ai' BY ;B © 

[4] ' PERIMETER: ' ;A+B © 

[5] ' AREA: ' ;AxB © 

[6] ' DIAGONAL: '-.A HYP B V 



V. SMITH' 

© 



The user writes a second function — one to calculate the perimeter, area, and diagonal of a rectangle. 
Note that he makes use of the previously defined HYP function within this function. He also made a 
mistake which will later need to be corrected. 

10 GEOMETRY 12 © 

The user tries to use the GEOMETRY function and receives the printout listed below. 

FUNCTION WRITTEN BY M. W . SMITH 
GIVEN A RECTANGLE OF 
SIZE 10 BY 12 
PERIMETER : 2 2 



AREA: 



DIAGONAL; 



120 
15.62049935 



After examining the printout, the user notes that the perimeter was not calculated correctly. The value 
should be twice the sum of the two sides. 

VGE0METRYl^U22'\ © 
The user indicates that he would like to modify line 4 of the GEOMETRY function beginning at column 22. 
[4] ' PERIMETER: ' ;4+S 



/// © 

[4] ' PERIMETER: ' ; 2x4tg © 

FsT V© 

APL types line 4, performs a carriage return and spaces to column 22. The user types three slashes indi 
eating that he wants the characters in columns 22 through 24 deleted. APL then retypes the line and 
waits, allowing the user to add new characters to the line if he so desires. The user types in 2xA+B. 
APL responds with the next line number, allowing the user to perform further modification to the func- 
tion if he so desires. The user has completed the modification that he planned and indicates this with 
a V character. 



10 GEOMETRY 12 fc 
FUNCTION WRITTEN BY M. W. SMITH 
GIVEN A RECTANGLE OF 
SIZE 10 BY 12 
PERIMETER: 4 4 



AREA: 



120 



DIAGONAL: 15.62049935 



APL 
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The user tries the function again to see if it is working correctly and sees that it is. However, now he 
has second thoughts about the line that says "FUNCTION WRITTEN BY M. W. SMITH" and decides to 
delete that line. 

VGEOMETEYLll © 
He opens the function and directs the system to line 1 . 

V 

The system prompts with [1] and the user presses the ATTN key followed by the RETURN key. 

[2] V@ 

The user closes the function because no further editing is to be performed. 



10 GEOMETRY 12 
GIVEN A RECTANGLE OF 



SIZE 10 


BY 


12 


PERIMETER : 


44 


AREA: 




120 



DIAGONAL: 15.520 39 935 



The user executes the function again and is pleased with the results. He lists the function definition 
for future reference, saves the 'workspace' containing HYP and GEOMETRY, and then logs off. 



'keometryld:!® 
va geometry b 
111 'given a rectangle of ' 



[2] 'SIZE ';/!.' BY ' ;B 



UT 



TsT 



PERIMETER: ' i2xA+B 



AREA: 



' ;i4xB 



' DIAGONAL: ' ;<4 HYP B 



C 6 ] V ® 

)SAVE MY MAT R © 
MYMATH SAVES 10:00 MAY 17. '73 



)OFF © 



In later sessions, the user can access HYP and GEOMETRY by using a )LOAD or )COPY command on 
the workspace named MYMATH which has been saved as a file. 
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6. LOADING AND EXECUTING OBJECT PROGRAMS 



LINK PROCESSOR 

The LINK processor consists of a one-pass link-editor/loader, or linking loader. The essential functions of the 
linking loader are to combine a number of separate program elements into a single executable entity called a load 
module (LM), and to load it for execution. You can request these two functions together with the RUN command, 
or separately with the LINK and START commands, respectively. In its linking operation, LINK merges 
internal symbol tables of several relocatable object modules (ROMs) presented to it and searches one or more sub- 
routine libraries to satisfy external references, where required. It makes full use of the CP-V Sigma hardware 
memory-mapping, allocating virtual data space as needed for association of a public core library such as the 
FORTRAN PO or PI libraries. 

The linking loader must be used both to link-edit and load one ROM, i. e. , the output of one compilation or as- 
sembly, along with any necessary system-supplied service procedures and library subroutines, or to link two or more 
ROMs from separate compilations or assemblies, with their combined system-related references, into one load 
module. 

RUN COMMAND 

The TEL command RUN requests linking, loading, and executing of one or more ROMs. Forms of the RUN command 
are as follows: 



1. RUN (or RUN S) 

These forms simply request that the ROM created by the last compilation or assembly be linked, loaded, 
and executed. The two forms shown are synonymous. (Input is taken from the file last assigned to the 
M:GO DCB; LM output is placed on a special temporary file. ) 

2. RUN rom 

The ROM stored on the disk file specified by rom is to be linked, loaded, and executed. (LM output is 
placed on a special temporary file. ) 

3. RUN[rom]{°^^Jlmn 

ROM input maybe specified as in 2, above, but the LM output mayalso be directed to the file named Imn. 

In each case, the LM output is ovailable for a subsequent reexecution via the START command. In all three cases, 
the public core library PI is implicitly associated with the object program to satisfy any external references. If 
possible. 

The general formats of the RUN and LINK commands are identicoi; thus the more complicated form shown for LINK 
In the next section Is equally applicable to RUN, and vice versa. 

Example 30. Using the RUN Command 



EDIT 



The user calls Edit. 



EDIT HERE 



*TA M 



He uses the Edit Tabs command (TA) and specifies the Meta-Symbol (M) tab setting (10, 19, and 37). (Other 
sets are available;see CP-V/TS Reference Manual, 90 09 07.) He then builds a source file, INPUT. 
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*BUILD INPUT© 


1.000 © SYSTEM® SIG7 8 


2.000 fli SYSTEM© BPM K 


3.000 © REF © M:UC © 


4.000 BEGIN @ MrWRITE ©' M:UC, (BUF, MESS) , (SIZE ,45) © 


5.000 © MrEXIT © 


6.000 MESS © TEXT© 'THIS MESSAGE SHOULD ',;© 


7.000 © 'PRINT AT THE TERMINAL.' @ 


8.000 © DATA © X' 15000000' © NEW LINE CHARACTER © 


9.000 © END © BEGIN © 


10.000 © 


*END © 


IMETA INPUT ON BIN © 


META Is called t"o assemble source file INPUT with ROM output going to file BIN and no assembly 


listing produced. 


WITH> © 


No assembly options are desired. 


_!_RUN © 


A run Is requested from the last compilation/assembly output, i.e., BIN in this case. 


LINKING $ 


The system acknowledges the LINK function (the LINK processor is Implicitly called). 


DEFAULT CORE LIBRARY IS NOT NEEDED 


See Exomple 31 for meaning of this message. 


THIS MESSAGE SHOULD PRINT AT THE TERMINAL. 


The program's output is printed. 


_!_OFF © 


The user logs off. The temporary file containing the load-module output of RUN Is now lost. (The 


ROM file BIN is permanent, however. ) 



LINK COMMAND 

The LINK command requests link-editing, as does RUN, but does not cause loading and execution of the resulting 
load module, A more complex variable-field format than those shown In the previous section for RUN Is given here: 

LINKrom^Crom^,.. • ' ''°'"n^ [qvER '""j L''''^1 t' ' '"^2' ' ' ' ' ''''n-'J 
re 

rom. specifies a disk file containing a ROM. 

Imn specifies a disk file for the LM output, 

lid. specifies a disk file containing a user's subroutine-library. 



whe 



In the format above, the several ROMs specified will be linked Into one LM, with user's libraries lldi through lldp, 
searched (prior to any public or system libraries) to satisfy external references, and the result placed ON or OVER 
Imn If specified. 
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In addiHon to the above, a parenthesized library-search code may be given. It is conventionally placed after the 
command verb, as in LINK (code) .... These codes request or suppress searching of system-supplied libraries, and 
are listed in Appendix D. Also, internal symbol tables for several ROMs may be merged or selectively deleted in 
the load module (see the CP-V/TS Reference Manual, 90 09 07, for these formats). 

Example 31. Using the LINK Command 



!LINK 


BIN ON LOAD © 




















A link-edit of the 


ROM on file BIN is requested. 


with the 


resultant 


LM p 


ace 


d on 


LOAD. 




LINKING BIN 




















The system respond 


s to the LINK command. 
















DEFAULT CORE LIBRARY IS 


\'0T NEEDED 


















The absence of a 1 
the default library 
tion of PI and also 


brary search code (see Append 
(PI) is not required. The spec 
suppress this message. 


"x D) in 
■fication 


the LINK 
of search 


command 
code N P 


causes this m 
wil 1 suppress 


essage If 
associa- 


_!_OFF 


3 




















Since the user does not vv^ant to execute the program at th 
are permonent and can be accessed in subsequent sessions. 


s time, he 


logs 


off. 


Fil 


es BIN and LOAD 


- accounting summary - 



















START COMMAND 

The ISTART command can be used to load ond execute a load module produced by a prior LINK command, or to 
reexecute an LM already RUN (or STARTed). Three forms are applicable: 

1. START 

This form causes the last LM produced, either via a LINK or RUN, to be loaded ond executed. Note that 
the prior LINK or RUN must have been given during the current terminal session; the load-module file may 
have been explicitly named (Imn), or named by default (S). 

2. START S 

This form causes the last LM produced on the temporary file S to be loaded and executed; the load-module 
file must hove been named by default (S). 

3. START Imn 

This form causes the load module contained on the specified file to be loaded and executed. The LM may 
have been the result of either a LINK or RUN operotion. 

See Chapter 8, User Programs, for an alternate way of loading and executing user-developed object 
programs: 



Example 32. Using the START Command 



J_START LOAD >£) 

The load module LOAD created in Example 31 is loaded into core and execution begun. 
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THIS 


MESSAGE SHOULD 


PRINT 


AT 


THE TERMINAL. 






The 


program's 


output 


is 


printed. 


_!_OFF 















- accoun 


ting 


summa ry 


- 
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7. DEBUGGING USER PROGRAMS 

Two dynamic debugging facilities are available for on-line use: 

• Delta processor for debugging Meta- Symbol programs. 

• FORTRAN Debug Package (FDP) for debugging Extended FORTRAN IV programs. 

"Debugging" is a general term for program-error detection and correction; dynamic debugging implies that the de- 
bugging process is carried out during the execution of an assembled or compiled program (as opposed to "desk 
checking"). Both Delta and FDP allow symbolic, i.e., source-program level references to elements of the object 
program. 



ASSEMBLY LANGUAGE DEBUGGING (DELTA) 

Delta provides conversational debugging capability for checkout and modification of Meta-Symbol programs at exe- 
cution time. Delta allows full use of symbolic references to elements of the object program, and enables you to 

• Control program execution, i.e., stop and restart it at any point, by means of breokpoints that you may 
insert in the program at your discretion. These breakpoints maybe unconditional ("always stop"), condi- 
tional ("stop under certain circumstances"), or based on changes in data values. 

• Examine, modify, and insert various program elements: instructions, constants, variable values, and en- 
coded data of all types and formats. This can be done both prior to execution and during any halt in 
execution (e.g., due to a breakpoint). 

• Trace continuous program execution by requesting a repeated display of specified sets of related informa- 
tion: register contents, switches, data values, etc., at specified points in the program. 

• Search programs and data for specific elements and values. 

Delta may also be used to write and check short Meta-Symbol or machine language programs. 

Please refer to the CP-V/TS Reference Manual, 90 09 07, for a comprehensive description and explanation of the 
commands available under Delta. 



EXECUTING IN DEBUG MODE 

To initiate execution of a program in debug mode, you must append the clause UNDER DELTA to your RUN or 
START command. Also, you must specify the SD (symbolic debugging) assembly option in response to WITH> to 
preserve the internal symbol table(s) of your program, if you want to refer to internal symbols with Delta commands — 
the normal case. (Internal symbols are those whose point of definition and points of use are entirely within one 
ROM.) 

Note that the global (or external) symbols of your program are always available for reference (see the following 
section). 

When UNDER DELTA has been specified. Delta intervenes between program loading and initial execution. At this 
point you can issue debugging commands to examine or modify locations, insert breakpoints, start execution at a 
specified point, etc. Delta also assumes control at any halt in execution. 

The following example illustrates the usual method of using Delta in the debug mode of execution. A simple pro- 
gram is assembled with the SD option, run UNDER DELTA, and patched to create a missing M:EXIT statement. Note 
that before you refer to internal symbols you must tell Delta the name(s) of the desired symbol table(s) by ROM-file 
nome (even though only one ROM may have been assembled). 

To leave Delta and return to TEL, you issue a Y control combination. 
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Example 33. Assembling and Loading in the Debug Mode 



J_META ME ON BFILE @ 
WITH> SD (g 

The user calls META to assemble statements from the terminal. He uses the SD option to cause an 
internal symbol table to be produced. 

^ SYSTEM SIG7 @ 

y_ SYSTEM BPM ® 

^ REF M:UC © 

^BEGIN M:WRITE M:UC , (BUF ,MES) , (SIZE ,9)0 

>^MES TEXT 'GREETINGS' @ 

2. END BEGIN @ 

* NO UNDEFINED SYMBOLS 



ERROR SEVERITY LEVEL: 
NO ERROR LINES 



Although there are no assembly errors, the user notes that he forgot to include an M:EXIT in the 
program and decides to make this correction with patches. 

_!_RUN BFILE UNDER DELTA (NP) @ 
LINKING BFILE 

He links and loads UNDER DELTA, suppressing loading of the default library with the code NP. 
DELTA HERE 
"ring" 

Delta identifies itself and prompts with a ring of the console bell. 
BFILE;S @ 

The user selects the internal symbol table associated with ROM BFILE. 
BEGIN/ CALl.l MES+.3 © 

This command opens the cell at location BEGIN and displays its contents. 
BEGIN(X/ .410C004 © 

A command is now entered to cause the contents of BEGIN to be displayed in hexadecimal format. 
The user terminates the command with the tab-key sequence, CONTROL I, which causes the cell 
addressed by this command (location C004) to be opened and displayed. 

MES+.3/ .11008C3G © 

MES+.4/ .30000000 © 

MES+.5/ .COOl © 

MES+.6/ .9 © 

The contents of the function parameter table (FPT) referenced by the M: WRITE (at location BEGIN) are 
displayed. Note that location C004 is shown symbolically as MES+. 3. A line feed causes the next 
cell to be opened and displayed. A carriage return terminates the sequence. Note that the hexa- 
decimal conversion format is maintained over the ©and ©. 

BEGIN \ B MES+20 © 

The user issues a command to open the cell at BEGIN and enters a branch to location MES+20, a 
patch area he has chosen that is well beyond the main program and the FPT displayed above. 
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MES+20\ CALl.l MES+3 © 


He enhers symbolic code for the M: WRITE Instruction (as originally contained in BEGIN, displayed 


above). The line feed causes the next cell to be opened for modification. 


MES+.15\ CAL1,9 1® 


The next location prints with a hexadecimal displacement. He then enters symbolic code 


corresponding to an M:EXIT. He has now entered all his patches. 


BEGIN ;G © 


He initiates execution. 


GREETINGS 


EXIT AT MES+.15 


The output message prints, and Delta reports execution of the M:EXIT, stating the location of the 


M:EXIT (MES + . 15). 


y'± 


The user interrupts with Y and then logs off. 


J_OFF @ 


FINI 


The system informs him that Delta was terminated. 


- accounting summary - 



USING DELTA IN NONDEBUG MODE 

Delta may also be called for use when you have not initially executed in debug mode, i.e., you did not specify 
UNDER DELTA In your RUN or START command. The next example illustrates this type of usage. 

Note that only the global symbol table is available, and that the user's first Delta command must be ;S to couse 
this symbol table — associated with the load module as a whole — to be loaded. Otherwise, no symbols will be 
available for reference. (If rom;S Is specified, as was possible in the preceding example, the global table Is loaded 
implicitly. ) 

Example 34. Calling Delta after Assembling and Executing In Nondebug Mode 



The user wants to assemble lines from the terminal and to default all options, 

_!_META ME © 

WITH> ® 

>_ SYSTEM SIG7 © 

>_ SYSTEM BPM @ 

>_ DEF START @ 

^ REF M:UC © 

>_START LI, 3 55® 

>_ M:STIMER (SEC,5),XY© 

>^AB LI,4 ® 

> STW,4 X @ 
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>XY 



>MES 



LW,4 X © 

CI, 4 © 

BE $-2 © 

M:STIMER (SEC,5),XY @ 

M:WRITE M:UC , (BUF.MES) , (SIZE, 17 ) ' 

BDR,3 AB @ 

M:EXIT © 

LI, 4 1 ® 

STW,4 X © 

M:rRTN © 

RES 1 © 

TEXT '5-SEC INTERVAL' © 

DATA.l X'15' © 

END START© 



*N0 UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL: 

* NO ERROR LINES 

J.RUN (NP) © 

LINKING $ 

He Initiates loading and execution of the prograr 



5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 



The program output begins to print. 

The user notes that the program is looping more than was intended, and notices that an error was 
made In the first statement (he typed 55 instead of 5), and decides to interrupt with Y*^ and call 
Delta to enter a patch. (The system did not echo a left arrow since it was in output mode.) 

IDELTA © 

Control goes to TEL. The user calls the Delta processor. 

DELTA HERE 



Delta identifies Itself and prompts with a bell. 

;S © 

The user loads the global symbol table. The only symbol that can be referred to is START which is 
the only DEF In the program. 

START(X/ .22300037 .22300005 © 

He enters a Delta command to display the contents of START in hexadecimal format, and changes 
this value to the hexadecimal equivalent of LI, 3 5. 



START ;G :g 



He directs execution to the beginning of the program (location START), 
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5-SEC 


INTERVAL 
















5-SEC 


INTERVAL 
















5-SEC 


INTERVAL 
















5-SEC 


INTERVAL 
















5-SEC 


INTERVAL 


















This time the 


prog 


ram executes 


as 


was 


intended. 






EXIT AT START + .A 


















Delta reports 


execution of the 


M: 


EXIT 


i.e., normal 


termination. 


y'± 




















CONTROL and Y 


interrupts Delta 


and 


returns contro 


to 


TEL. 


J_OFF © 


















The user logs 


off. 














- accounting summary 


- 















USING DELTA TO WRITE PROGRAMS 

The user may write and check short Meta-Symbol or machine language programs using Delta. Example 35 illustrates 
the method by which this is done. In the example, a table TAB with ten numeric entries Is created and a program Is 
written to find the sum of the numbers and to store the result in location SUM. It would be helpful to review the 
commands: 

e\ 
and 

e(f<S>[K] 

in Chapter 7 of the CP-V/TS Reference Manual, 90 09 07, before studying the example. 

Example 35. Using Delta to Write a Program 



_!_DELTA © 


























DELTA HERE 
.10000(X<TAB>K® 






















The user begins creating the 
(The range of addresses aval 


data fo 
able to 


his 
the 


program 
user is . 


by defining the 
COOO- .IBFFF. 


global 

) 


symbol 


TAB at 


location 


.10000. 


TAB\5© 


























The page 
opened. 


at . 
The 


10000 is 
user then 


obtained from the Monitor with the command TAB\. Also, the 
loads ten values into the table TAB, the first value being the 5 


cell at . 
above . 


10000 is 


TAB+.1\ 6 
TAB+.2\ 23 
TAB+.3\ 41 
TAB+.4\ 90 


© 
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TAB+.5\ -2 
TAB+.6\ 57 
TAB+.7\ -34 3 
TAB+.8\ 2 
TAB+.9\ 588 © 
TAB+.A(I<StIM>K © 

The global symbol SUM is defined at the next available location. 

TAB+ .B(R<BEGIN>K@ 
BEGIN \ LI, 2 © 

BEGIN+.1\ LI , 3 © 

The global symbol BEGIN is defined at the next available location and the first two instructions of the 
program are written. 

BEGIN+.2(R<RETURN>K ® 

RETURN AW , 3 TAB , 2 ® 

RETURN+.1\ AI , 2 1 

RETURN+.2\ CI, 2 10 © 

RETirRN+.3\ BNE RETURN © 
RETURN+.4\ STW,3 SUM© 
RETURK+.5\ CAL1,9 1© 

The global symbol RETURN is defined at the next available location and the remaining instructions of 
the program are written. 

BEGIN;G © 

The user executes the program. 

EXIT AT RETURN+.5 

SUM/776 

The user obtains the answer by displaying the contents of SUM. 



FORTRAN DEBUGGING [FDP] 

The FORTRAN Debug Package provides a powerful conversational facility for convenient and rapid checkout of 
FORTRAN IV programs. The debugging features provided are dynamically controllable from the terminal at program- 
execution time, ond include the following: 

Statement stepping. 

Conditional breakpoints. 

Data-change breakpoints. 

Execution-flow tracing and event-history recording. 

Display and modification of scaler and array-element values. 

Branching. 

Program restart. 

Statement skipping and deletion. 

Automatic calling-argument display. 
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You may refer to variables by name and to statements by source-line number or statement label. These references 
may be further qualified by subprogram name. 

The FDP facility consists of a sublibrary of run-time subroutines (a portion of public library PO), plus the necessary 
symbol tables and In-line coding generated by the compiler when debug-mode is requested. (FDP can be used only 
when debug-mode compilation has been performed. ) Programs compiled in debug mode should not be used indis- 
criminately, OS they require approximately 2.5 times the amount of memory required for nondebug runs and may 
even double normal execution times. 

In order to use FDP, you must do the following: 

1. Specify the DEBUG compilation option when FORT4 prompts for options. 

2. Specify in the RUN or LINK command either one of the library-search options (FDP or PO), or the clause 
UNDER FDP (the three forms are synonymous). 

The two examplesgiven here illustrate, In addition to TEL command usage, some of themore commonly used FDPcom- 
mands. Seethe FDP/Reference Manual, 90 16 77, for a complete description of the FDP commands, and a full explana- 
tion of their use. 

In the following example, the user compiles file INPUT, created in a previous example. In debug mode. Values 
for X, Y, and Z are read from file DATA (also created in the prior exomple). The ON debugging command causes 
values of D, X, Y, and Z to be displayed whenever D Is computed. 

Example 36. Use of FDP ON and PRINT Commands 



_!_F0RT4 INPUT ON ,ME © 

The user compiles file INPUT and directs the listing and compilation summary to the terminal. 

EXT. FORTRAN' IV, VERSION COO 
OPTIONS > DEBUG , LS @ 

Note the specification of DEBUG as an option. 

1: WRITE (6.100) 

2: 10 READ (5,200) X,Y,Z 



3: IF (X) 20,50,20 

4: 20 D = SQRT(X**2+Y-"-*2+Z^*2) 
5: WRITE (6,300) X,Y,z7d~ 

6: GO TO 10 



7 : 50 STOP 



8: 100 FORMAT (7X, IHX, IIX, IHY, IIX, IHZ , IIX, IHD) 

9 : 200 FORMAT (3E11.3) 

10: 300 FORMAT (4(1X,EI1 .3)) 

11: END 



HEX DEC HEX DEC 



NAME TYPE CLASS LOC WORDS NAME TYPE CLASS LOC WORDS 

D R SCALR 00003 V I SQRT R SPROG INTRIN 

"X R SCALR 00000 V 1 Y R SCALR 00001 V 1 

~Z R SCALR 00002 V 1 



HEX HEX HEX HEX 

LABEL LOC LABEL LOC LABEL LOC LABEL LOC 



10 00008 20 00017 50 00036 100 0003A 

200 00043 300 00046 

LOCAL VARIABLES (4 WORDS) : 

00000 X 00001 Y 00002 Z 00003 D 
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BLANK COMMON (0 WORDS) 



INTRINSIC SUBPROGRAMS USED: 



SQRT 



EXTERNAL SUBPROGRAMS REQUIRED: 



F:UF 


F:108 


M:DO 


M:OC 


M:SI 


9 BCDREAD 


9 BCDWRIT 


9DBDGKIN 


9DBFHG0 


9DBFHIF 


9DBINIT 


9DBSCKIN 



9ENDI0L 



9I0DATA 9SQRT 



9 STOP 



HIGHEST ERROR SEVERITY : (NO ERRORS) 



DEC 



HEX 



WORDS 



WORDS 



GENERATED CODE: 


119 


00077 


CONSTANTS : 





00000 


LOCAL VARIABLES: 


4 


00004 


TEMPS: 


4 


00004 


TOTAL PROGRAM: 


127 


0007F 



The program listing and compilation summary is printed. 

J_SET F:6 /VECTORS; OUT © 

The user directs the fxogram output to file VECTORS. 
J_SET F:5 /DATA; IN («? 

Program input will be read from file DATA. 
J_RUN (FDP) © 

The user loads and executes in the debug mode. Alternatively he could have specified; 

_!_RUN UNDER FDP or 

IRUN (PO) 

LINKING $ 

The loader's message prints. 

@0N D;PRINT X,Y,Z © 



FDP prompts with @. The user enters commands to cause the value for D to be displayed each time it 
is stored into, and at the same time to display values for X, Y, and Z. 



@G0@ 



The user does not wont to enter any more debug commands at this point and issues a GO command to 
start execution. 

/4(20S): D=3. 74166 X=l. 00000 

Y=2. 00000 
Z=3. 00000 
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4(20S): D=l. 73205 X=l. 00000 


Y=l. 00000 


Z=l, 00000 


Values for D, X, Y, and Z are displayed. The slash (/) Indicates main program and is followed 


by line number and statement number (if present) in parentheses. 


-^STOP* 


This message is produced by the library subroutine STOP. 


7(50S) : RDY TO STOP 


This message is produced by the debugger. 


gQUir © 


The QUIT command causes return to the monitor. 


J_OFF 


- accounting summary - 



In the next example, the user enters a FORTRAN source program from the terminal without initializing variables, 
setting loop control, and providing for I/O. He runs in the debug mode and issues FDP commands to provide the 
omitted functions. 

This program generates a Fibonacci sequence, in which the value of any number (beyond the second) in the sequence 
is equal to the sum of the values of the two preceding numbers, e.g., 1,1, 2, 3, 5, 8, 13,21,34,55,.... 



Example 37. Further Uses of FDP Commands 


_;_F0RT4 ME ON ,LP@ 


OPTIONS > DEBUG (^ 


>10 I=I+J 1® 


>20 J=H-J 8 


>^30 GO TO 10 @ 


>40 END © 


HIGHEST ERROR SEVERITY: (NO ERRORS) 


IRUN UNDER FDP © 


This command causes the user's program to be loaded and executed, with public library FDP associated. 


LINKING $ 


(?I=0 © 


@J=1 © 


FDP prompts with @. The user initializes I and J. 


@0N I © 


gON J © 


These ON commands wil 1 cause values for land J tobedisplayed when these variables are stored into. 



FORTRAN Debugging (FDP) 69 



@STOP AT 3#5 © 

This command causes execution to halt the fifth time that statement 3 (the GO TO statement) is encountered. 



(3G0 © 



Execution is now begun with the above commands in effect. 



/I(IOS): 


1=1 


2(20S): 


J=2 


I(IOS): 


1=3 


2(20S): 


J=5 


I(IOS) : 


1=8 


2(20S) : 


J=13 


I(IOS) : 


1=21 


2(20S): 


J=34 


KIOS): 


1=55 


2(20S): 


J=89 



Values for I and J are displayed. The slash (/) indicates main program and Is followed by line 
number and statement number (in parentheses), 

3(30S): 

The program halts the fifth time thot statement 3 is reached. 
@KILL © 

FDP prompts for a command. This KILL cancels all previous FDP commands. 
©STOP ON I>500 @ 

A conditional stop, or breakpoint, is set. 
@AT 3; PRINT I, J © 

These commands will cause values of 1 and J to print each time statement 3 is reached. 
@RE START @ 

This specifies restart of program from beginning, 
@G0 © 

The user resumes execution. 

/3(30S) : 1=144 
J=233 

3(30S): 1=377 
J=-610 

Values for I and J are displayed each time statement 3 is reoched, 

I(IOS): 1=987 

At statement 1, the value for I exceeds 500 and the program halts. 
@KILL ON I © 

This command concels the last ON I, effectively the last STOP command issued. 

@STOP ON J>10000 © 

Another conditional stop is issued. 
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gGO @ 


Execution Is resumed at statement 3, which is where the previous stop occurred. 


/3(30S) : 1=987 


J=1597 


3(30S): 1=2584 


J=4181 


2(20S) : J=10946 


Values for I and J print until J exceeds 10000 which occurs at statement 2. 


gPRINT I © 


6765 


Since statement 3 was not reached to cause the current value for I to be displayed, the user gives 


a PRINT command to cause this value to print. 


@QUIT © 


The user now leaves FDP and returns to TEL. 


! OFF © 


- accounting summary - 
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8. EXECUTING USER PROGRAMS 



An object program stored on a file in load-module form may be called by its load-module name (Imn) used as a TEL 
command verb. The load-module file may be stored either in your own account, someone else's account, or the 
system account. Thus far, the Imn-as-verb command is synonymous to the ISTART Imn command (except for a dif- 
ference in account-number defaults). Within the limn command, however, you can also very conveniently make 
file or device assignments for three standard system DCBs: M:SI, M:GO, and M:LO. 

The format of the variable field of the command is analogous to that of the FORT4 and META commands; the full 
format is 

!lmn [input] [q\^^^ [output ^][, output^]] 

v/here 

Imn is the fid of an LM that can take the full form: 

name . [account] [. password] 

(see below for special defaults) 
input may be a fid or ME to be assigned to the input DCB M:SI. 

output^ may be a fid to be assigned to the output DCB M;GO. 

output- may be a fid, ME, or LP to be assigned to the output DCB M:LO. 

(Normal default assignments apply. That is, the M:SI and M:LO DCBs, if referenced, default to the user's terminal, 
and M:GO to a temporary fTle named S. ) 

The called program must, of course, directly or indirectly utilize one or more of the above-mentioned DCBs for any 
of these assignments to moke sense. 

You can imply or specify the account number under which the LM file is stored, and specify a password, as follows: 

1. filename — (alone, with no period) implies the system account. 

2. filename. — implies your account (i.e., the log-on account value). 

3. filename. account —specifies an account number. 

4. filename.account.password —specifies an account number and password. 

5. filename, .password — implies your account and a password. 

Note that this particular convention of default account number values is not the standard one that applies to most 
fid specification in TEL and other commands, as described in Appendix B. The reason for the system account de- 
fault in particular is that installations may want to include, at system generation time, certain user-developed 
"production" programs in the system account; special forms of these may then be accorded preferential disk-storage 
and loading, depending upon frequency of use and programming characteristics. (META and FORT4 commands, for 
example, are actually special instances of limn commands. ) 

The two examples following show very simple programs, developed wholly within the example for purposes of illus- 
tration. Actual uses of the command may, of course, call a program developed some time in the past, and possibly 
by another programmer. 

The program in Example 38 reads a Meta-Symbol source program via M:SI, and writes out any comment lines (asterisk 
in column l)contained in the program via M:LO. The input file and output device are assigned within the calling 
command. As a test, the user specifies as input the source program from which the called object-program was assembled. 

Example 39 merely shows a simple FORTRAN IV program call by its load-module name. Since the compiler automati- 
cally provides (indirectly) program-file DCBs identified with names of the form F:n, file/device assignments cannot 
also be made within the !lmn command for FORTRAN object programs. 
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Example 38. Using Load-Module-Name as Command Verb (Meta-Symbol Program) 



EDIT @ 
EDIT HERE 
*TA M R 



The user sets tabs for META. Then he builds a Meta-Symbol Program to extract comments lines from 
Meta-Symbol source programs. (Usage of tab control not shown.) 



^BUILD SOURCE i^: 

1.000 * ^^'^UTILITY PROGRAM "EXTRACT"*** © 

2 .000 * THIS ROUTINE LISTS ONLY THE COMMENTS LIKES, IF ANY, FROM; 

3 . OOP ■■ A META SOURCE -PROGRAM FILE. IT ISSUES A BLANK© 

4 .000 * LINE TO INDICATE ONE OR MORE CODING LINES© 

5.000 * INTERVENING BETlvfEEN COMMENTS. IT READS ITS INPUT© 

6.000 * FROM M:SI, AND WRITES TO M:LO.© 

7.000 SYSTEM BPM © 

8.000 SYSTEM SIG7© 

9.000 REF M:SI,M:L0@ 

10.000 * *** INPUT BUFFER*** © 

11.000 INTJ RES 20 © 

12.000 * i"'r*80 BLANKS*** © 

13.000 BLANKS EQU S © 

14.000 DOl 20 © 

15.000 TEXT ' ' ©■ 

16.000 * liffi GIVE A TOP-OF-PAGE AT BEGINNING (AND END) @ 
17.000 START M: DEVICE M:LO,(FAGE) 

18.000 * SWITCH: "HAVE ^^^E ISSUED A BLANK LINE ?" : = YES/1 = NO 
19.000 LW,4 =0 

20.000 R DNXT MrREAD M :S1 , (BUF , INN) , (SIZE ,80) , (ABN , EXIT) 

21.000 LB , 5 INN 

22.000 CI, 5 '*' 

23.000 BE PRINT 

24.000 CI, 4 

25.000 BE RDNXT 

26.000 M:WRITE M :L0, (BUF .BLANKS) , (SIZE ,72) 

27.000 * \-fE SET THE SWITCH: "BLANK LINE ISSUED SINCE LAST 
28.000 * COMMENT" 

29.000 LI, 4 

30.000 B RDNXT 

3 1 . 000 * WE RESET THE SWITCH: "BLANK LINE NOT ISSUED SINCE THE 
32.000 * LAST COM^^ENT" 

33.000 PRINT LI, 4 1 

34.000 LW,1 M:SI+4 

35.000 SLS,1 -17 

36.000 MiWRITE M:LO, (BUF, INN) , (SIZE ,*1) 

37.000 B RDNXT 

38.000 E XIT M:DEVICE M:LO,(PAGE) 

39.000 M;CL0SE M:LO,(SAVE) 

40.000 M:EXIT 

41.000 END START 

IMETA SOURCE ©; 

WITH> © 

* NO UNDEFINED SYMBOLS 



'■■ ERROR SEVERITY LEVEL: 

'- NO ERROR LINES 

LLINK (NP) ON EXTRACT © 

LINKING $ 
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ICOPY SOURCE TO SORCNC(NC) © 
■ .COPYING 

The user copies the source file using the NC option to strip the carriage-return off each record; 
otherwise the output below would be double spaced. 

j_EXTRACT. SORCNC ON ,ME © 

Here he calls the LM EXTRACT, with a following period to indicate "my account", and assigns the 
input file, SORCNC, and directs M:LO output to the terminal. 

V- ***UTILITY PROGRAM "EXTRACT"*** 



THIS ROUTINE LISTS ONLY THE COMMEXTS LINES, IF ANY. FROM 
A META SOURCE-PROGRAM FILE. IT ISSUES A BLANK 
LINE TO INDICATE ONE OR MORE CODING LINES 
INTERVENING BETWEEN COMMENTS . IT READS ITS INPUT 
FROM M:SI, AND WRITES TO M:LO. 



*** INPUT BUFFER* 



^80 BLANKS* 



WE GIVE A TOP-OF-PAGE AT BEGINNING (AND END) 

SWITCH: "HAVE WE ISSUED A BLANK LINE ?": = YES/l = NO 

I'TE SET THE SWITCH: "BLANK LINE ISSUED SINCE LAST 
COMMENT" 



WE RESET THE SWITCH: "BLANK LINE NOT ISSUED SINCE THE 
LAST COMMENT" 

The program's output has printed and control reverts to TEL. 



Example 39. Using Load-Module-Name as Command Verb (FORTRAN Program) 



-page heading- 

ITABS 7© 

The user sets a tab stop for terminal input. 

! BUILD FILEl© 



1.000 © 1=1 



'S 



2.000 f^ WRITE (6,20)@ 

3.000 © DO 10 J=l,10© 

4.000 © 1=1*3® 

5.000 10© WRITE (6,30) I© 

6.000 2 0© FORMAT ( IX, 15HP0WERS OF THREE)© 

7.000 30© FORMAT (5X,I7)® 

8.000 © END© 

9.000 I® 

^COMMENT ON ME © 
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1F0RT4 FILEl ON OUTFILE© 

FORT4 is called to compile source program FILEl, with ROM output going to OUTFILE. 

EXT. FORTRAN IV. VERSION C02 
OPT IONS >K S Q 

F0RT4 prompts for options. The user suppresses the partial -summary output. 
j_SET F:6 UC @ 

This command will cause output to device 6 to be directed to the terminal. 
_!_LINK OUTF ILE ON P0W3 ® 

Call LINK to create load module POW3. 
LINKING OUTFILE 

The LINK processor responds. 
PI ASSOCIATED 
J_P0W3 . @ 

Load module POW3 is loaded into core and executed. The log-on account is used. 
POWERS OF THREE 



27 



243 



729 



2187 



6561 



19683 



59049 



'■^STOP^- 



The program's output is printed, 

J_0FF © 

-accounting summary- 
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9. GETTING IN AND OUT OF PROCESSORS 



GENERAL 

Once having logged on, you are always in one of three states of processing; 

1 . In Job Step: You ore in a system (or user) processor, i.e., in "normal" user-program execution. 

2. In an Interrupt of a Step: You are at TEL level but have an interrupted processor associated. 

3. Between Steps: You are at TEL level with no processor associated. 

If you ore in a processor, you can return control to TEL by depressing certain terminal keys (discussed shortly). Cer- 
tain TEL commands can then be issued to perform minor operations after which control can be returned to the proces- 
sor that was interrupted. The issuance of other TEL commands will cause either an abort of the previous job step or 
a diagnostic message. For example, interrupting META to issue a DONT COMMENT command does not cause an 
abort and allows return of control to META; Interrupting META to call Edit will result in an abort of META; inter- 
rupting META to issue a SET command will result in the message "QUIT?", at which point the user may choose be- 
tween quitting or continuing the META processor. A complete description of the TEL commands and their effect 
when used during a job step interrupt is given in Chapter 3 of the CP-V/TS Reference Manual, 90 09 07. 

BREAK, CONTROL Y, ESC Y, AND ESC ESC 

Any CP-V processor or user's object program can be interrupted by depressing the BREAK key. Use of the BREAK 
causes one of the following to occur: 

1 . If you are in a processor that has no command language (e.g., assembling with META), control is given to 
TEL whenever a convenient interrupt point is reached. TEL then prompts for a command. 

2. If you are in communication with a processor that has break control (e.g.. Edit, BASIC), and in a sub- 
process such as listing or copying, control is given to the processor, which prompts for its next command 
or possibly issues an interrupt message. 

3. If an object program or processor Is In a process that does not have break control (i.e., has not used the 
MrINT Monitor service) control Is given to TEL. 

The CONTROL Y combination or the ESC Y or ESC ESC sequences always return control to TEL. This type of inter- 
rupt can also be caused by depressing the BREAK key more than three times. (Certain processors may take special 
action on receipt of two or three break signals.) Examples of interrupting a processor are given in Example 40. 



Example 40. Using CONTROL Y and the BREAK Key 



!EDIT FILES© 


EDIT HERE 


The user decides to make changes to FILES. 


*IN 7,1© 

7.000 Y^i- 


He starts to modify the file but changes his mind and Interrupts by hitting CONTROL and Y simulta- 


neously. The system echoes a left arrow. 


_!_PCL© 


Control returns to TEL. The user calls PCL. 
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PCL BOO HERE 



PCL Identifies Itself. 



< LIST '-'S 



The user asks to have the names of the files thot are currently in his disk directory listed. 



ARC SINE 

COWJAY 

DATA 

FILES 

INPUT 



5 FILES LISTED 



He does not want to see the entire list, so he hits BREAK to stop the output. 



<COPY FILES TO LP'; 



< END 



Return is made to the command state of PCL. The user issues a COPY command to copy file 
FILES to the line printer. 



He leaves PCL. 



_!_EDIT FILES 
EDIT HERE 



*TYl-7:; 



He calls Edit and issues commands to type lines in file FILES. 



I. OOP * THIS PROGRAM SEARCHES NAME /ADDRESS-RECORD FILES ORDERED BY 

2.000 -'- ZIP-CODE LOCALITIES. IT ALSO INSERTS AND DELETES N/A RECORDS. THE 

3.000 -- CALLING SEO P: i1^: Pi :Pi *- 



He does not wont to see the entire file, so he returns to TEL by hitting BREAK four times. He 
could also have returned to TEL by depressing CONTROL and Y or Q gi . 



--ENTER X TO ABORT COMMAND. ANY OTHER CHARACTER CONTINUES. 



The Edit processor has break control and types this message in response to the first break. The 
subsequent breoks cause direct return to TEL. 



! OFF ' 



- accounting summary- 
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QUIT AND CONTINUE COMMANDS 

After you have interrupted a processor and have optionally issued one or more commands, you have three alternative 
courses of action if the Interrupted processor has not been aborted during the interrupt: 

1 . Return to the interrupted processor by issuing a CONTINUE command. 

2. Discontinue use of the current processor by Issuing a QUIT command. 

3. Call another processor, which has the effect of aborting the previous operation. 
Each of these actions is illustrated in the following example. 

Note that both END and STOP ore equivalent to QUIT, and that GO is equivalent to CONTINUE. 



Example 41 . Interrupting, Continuing, and Quitting Execution 



_!_BUrLD INPUT 'S 
1.000 SYSTEM y'^ 



The user wishes to build file INPUT but forgot to set tab stops before building the file. So he 
now interrupts Edit by simultaneously depressing CONTROL and Y which the system echoes as 
a left arrow. Control is given to TEL. 

J_TABS 10,19,37® 

He now sets tab stops for the terminal I/O. 

_!_CONTINUE © 

He issues a CONTINUE command which takes him back to Edit (with no prompt). He retypes 
his first line, since he interrupted while typing this line. 



2.000( 



SYSTEM'S SIG7 © 
SYSTEM BPM © 



3.000 START CiJM: PRINT © (MESS.MES) © 

4 .000 3 M:EXIT © 

5.000 MES © TEXT© 'MESSAGE TO TERMINAL'© 

6 . OOP Q END 8 START© 

7.000 © 



_!_META INPUT ON BOFILE,LP® 
WITH > © 



Y ± 

He calls META to assemble the program, but then spots on error in the program and interrupts 
with Y*^. 

_[^EDIT ©I 

He calls Edit to correct the error. META Is automatically aborted. 

EDIT HERE 
*EDIT INPUT © 

He wants to retype line 5 to change TEXT to TEXTC. 
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^IN5@ 



He issues an Insert command (IN) to correct the line. (Note that a space Fs not required between 
the command and the line number.) 



5.000 M ESQ TEXTCQ' 'MESSAGE TO TERMINAL'®. 

*ENT) © 

_!_META INPUT OVER BOFILE,LIST@ 

WITH>@ 



He again calls META to assemble file INPUT and request an output listing. Note use of 
OVER to reset file extension, ensuring that any output from the previous aborted assembly 
is Overwritten. 

''NO UNDEFINED SYMBOLS 



'•- ERROR SEVERITY LEVEL :0 
"NO ERROR LINES 
[LINK (NP) BOFILE ON MES ® 



LINK is called to create load module MES. 

LINKING BOFILE 



!EDIT INPUT 'wi 



EDIT HERE 



'-TY1-6:":: 



He now wishes to see the corrected source and colls Edit to display the file, (Note that a space 
is not required between the command and the line number.) 



1 . 000 SYSTEM SIG7 

2.000 SYSTEM BPM 



He decides he does not want to see the entire file after all, so he simultaneously depresses 
CONTROL and Y to interrupt Edit and return control to TEL. The system did not echo a left 
arrow since it was in the output mode. 



IQUIT S- 

He then issues a QUIT command so that use of the Edit processor will be discontinued. 

_!_NES.@ 

He now wants to load and execute program MES (but misspells the program name). 



He realizes that MES is misspelled and that NES (which happens to be another valid program 
name) is now operating, so he returns control to TEL and types in the correct name. 
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!MES.v"$ 



QUIT? 



The sysfem informs him that the program cannot be loaded without quitting the previous process 
(NES), and that he must issue either a QUIT or a CONTINUE command. An implied QUIT may 
be issued by entering a RETURN or LINE FEED character by itself. (This message would not have 
appeared hod the user preceded the MES. command with a QUIT command.) 



The implied QUIT command causes the processor previously specified (MES) to be loaded and 
executed. 



MESSAGE TO TERMINAL 



The program output prints. 



! OFF iKi) 



accounting summary - 



PROGRAM ABORTS 

Many conditions can cause your program to be aborted, e. g. , an invalid operation code. When on abort occurs, 
the system prints on abnormal or error code (e. g. , 4A00) followed by a message telling you the reason for the abort. 
The CP-V/TS Reference Manual, 90 09 07, Appendix B, contains listings and explanations of the Monitor error 
messages. 

The following example shows a program that will simply read two records of predetermined size from a file and print 
them at the terminal. However, o misspelled label In line 8 (BUF instead of BUFF — not a syntax error) causes an 
attempt at execution time to read Into relative location 12. Since this location Is in a write-protected procedure 
area of the program (i. e. , the area cannot be stored into), the program Is aborted and an appropriate message issued 
by the system. (Note that the program in this example is not Intended to be realistic, but Is designed solely to 
illustrate as simply as possible the "bug", and thereby the point of the example. ) 



Example 42. System 


Handl ing of 


an Abort during Execution 




IBUILD READ @ 








The user 


builds files 


READ and LINES (following 


Ine 14). 


1.000 


SYSTEM 


SIG7 © 




2.000 


SYSTEM 


BPM © 




3.000 


REF 


M:SI © 




4.000 


REF 


M:UC © 




5.000 BUF 


EQU 


10 © 




6.000 START 


M:READ 


M:SI, (BUF, BUFF), (SIZE 


16) © 


7.000 


M:WRITE 


M:UC, (BUF, BUFF), (SIZE 


17)© 
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8.000 


MrREAD 
M:WRITE 


M:SI,(B1 


9.000 


M:UC,(Bl 


10.000 


M:EX1T © 




11.000 BUFF 


RES 


4 ©' 


12.000 


DATA.l 


X'15'© 


13.000 


END 


START £ 


14.000 ^ 






j_BUILD LINES © 






1.000 HELLO, 


TERMINAL! © 




2.000 GOODBYE 


I gi 




3.000 © 







M:SI,(BUF,BUF+2) ,(SIZE,8) @ 



_!_COMMENT ON ME £' 

J_META READ © 

WITH > © 

*-k** ILLEGAL BUF/PARAM-RETURN ADDRESS 
'■ NO UNDEFINED SYMBOLS 
'- ERROR SEVERITY LEVEL: 3 

* ERROR LINES 



He calls META t-o assemble fhe source file. META produces summary messages indlcaf-ing that there 
was an assembly error. However, the user decides to run the program anyway. 



!SET M:SI DC/LINES; IN© 



He sets M;S! to the input file. 



j_RUN (NP)© 

LINKING$ 
HELLO, TERMINAL! 



The first record is written. 



4A00 SPECIFIED BUFFER DOES NOT BELONG TO THE USER 



The system returns an abort message with an error code when the user tries to read the second record 
Into location 12, which is in a protected area. 
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10. ASSIGNING DGBs 



DATA CONTROL BLOCKS 

A data control block (DCB) is a standardized table of information about the characteristics of on existent data-file 
or one to be created. The system's file-management service routines use the DCBs essentially to obtain detailed 
information both about the file, (i.e., the data) and the physical storage media assigned to it. This, combined 
with information supplied in a given service request, completely defines the requested operation. These routines 
also use the DCB to post or update dynamically-variable "historical" information concerning the data file (specific 
results of the last I/O operation performed, for example) to which the user's program and other system routines may 
refer. 

The DCB also is, effectively, the connecting link between the user's input/output service requests, file-manogement 
commands, etc. , and the actual disk storage space or peripheral device from which or on which a given data file 
is to be read, written, copied, saved, deleted, and so on. Sometimes the reference to this "link" is explicit at 
the user's level, as for example in an M:READ or M:WRITE Monitor procedure in a Meto-Symbol program, or in a 
SET command when the user needs to assign or reassign program input or output DCBs to specific disk fiiesordevices. 

MEANS OF FILE/DEVICE ASSIGNMENT 

The !SET command may be used to explicitly assign any DCB (excepting M:UC, M:OC, and M:XX) to a file or 
device, as seen in a number of preceding examples. (SET can also be used for setting and resetting various param- 
eters, or relatively fixed items of information in a DCB, e.g. , file options, but a general discussion of this usage 
does not concern us here. ) 

The lOUTPUT, !LIST, and ICOMMEI^IT commands can be used to implicitly assign several standard system DCBs 
commonly used by system processors: M:GO, M:LO, and M: DO, respectively. Usage of these commands was also 
shown and described for specific cases in preceding chapters. And, summarizing topics covered in Chapters 5 
and 8, the source, rem, and list parameters of MET A, FORT4, and Im-name commands implicitly assign the M:SI, 
Mr GO, and M: LO DCBs. 

In general, the SET command need only be used to assign user-program files for DCBs that have no default assign- 
ment (or on undesired one), or to assign standard system DCBs, other than the ones named above, for special -option 
processor outputs, e. g. , the CO, BO, and SO options and the corresponding M:CO, M:BO, and M:SO DCBs. To 
assign M:SI, M:GO, M: LO, and M:DO, the choice between the several means described above is simply a matter 
of the user's convenience, as they each "do the some job", excepting that SET cannot be used in a job-step inter- 
ruption. (See SET Command below, for specific information concerning BASIC, ) 



STANDARD SYSTEM DCBs 

The system includes an extensive set of standard DCBs that provide for the majority of system- and user-program 
needs. The link-loader supplies a uniform loodei — constructed copy of these DCBs to the user's program as required 
to satisfy references thereto. These DCBs all have names of the form M:xy, where xy generally corresponds to a 
system-defined operational label (discussed under SET Command below). These DCBs, when used on-line, have the 
on-line default assignment (if any) defined by the system for the corresponding operational label. Note that the 
default assignments for M:UC and M:OC, the user's terminal in both coses, are really fixed assignments, i.e., you 
cannot change them. (The default assignments can vary with individual installations, and most of them differ for 
batch operations. ) 

Although a number of system DCBs default to the user's terminal, the M:UC DCB is unique because (1) its fixed 
assignment is to the terminal — like M:OC, and (2) output through it is treated differently by the Monitor than out- 
put to the terminal via any other DCB — unlike M:OC. For terminal output via any DCB other than M;UC, the 
Monitor's COC (Character-oriented Communications) routines automatically append a carriage-return/! ine-feed 
combination to each record written without a terminating carriage return. The COC routines do not append 
such a combination to output written via M:UC; it will substitute that character combination, however, for any 
carriage-return or line-feed character in the record. This difference allows you, when using M;UC, to produce one 
physical line at the terminal with a series of records. (See CP-V/TS Reference Manual, 90 09 07, Chapter 10, 
for details.) 
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In addition to the standard system DCBs, the link-loader will supply a uniform loader -constructed DCBfor anyMtab 
DCB reference where M:ab is not known to the system, and for any DCB reference of the form F:ab, such as pro- 
duced by FORTRAN IV for program files, where ab corresponds to the FORTRAN unit number. In these cases, the 
DCBs neither have a default assignment nor are they automatically defined for input or output —excepting F:101 
through F:108, the FORTRAN standard units. They are also not defined for final disposition, and an I/O function 
and disposition parameter (e.g. , IN, SAVE) may need to be set as well if the assignment is to a file or labeled tape. 
(These settings are described below.) 

ASSIGN/MERGE TABLE 

DCB assignments, excepting those for M:SI, automatically remain in effect across [ob steps until reset or negated. 
Assignments can be reset or negated between job steps. The mechanism for setting and resetting assignments Is the 
assign/merge table, during an on-line session. An M:SI assignment is effective only for a single job step; following 
that step It always reverts to its default assignment, the user's terminal. 

Any assignment made by any of the means described above causes an entry to be made in your assign/merge table. 
At the beginning of any job step Involving a processor (Including LINK) or a user's program, the entries In the 
assign/merge table are merged into the corresponding DCBs. (An entry in the table Is deleted by a [SET deb 0.) 

If an error occurs when accessing the ASSIGN/MERGE record, the user will be logged off. He must log back into the 
system to continue. 

The apparent negation of an assignment achieved specifically by means of a DONT. . . command, e.g., DONT LIST, 
bypasses the assign/merge table and affects only a switch in the user's JIT (job Information table)at the time the com- 
mand is issued, whether between job steps or during a job-step Interruption. (The Implied DCBIs notaffected.) Only 
the standard processor outputs written via M:GO (OUTPUT), M:LO (LIST, and M:DO (COMMENT) DCBs can be 
affected in this way. 

OUTPUT, LIST, AND COMMENT COMMANDS 

Control over output from META, or FORT4, or a standardized user-processor may be exercised with the following 
commands before the processor command Is issued: 

• OUTPUT ON or OUTPUT OVER followed by o file name. This command specifies the destination of the 
relocatable-object output (ROM) from the processor via the M:GO DCB. M:GO defaults to o special 
file, which you may refer to in some cases with a dollar sign ($). 

• LIST ON or LIST OVER followed by ME, LP, or file names. This command specifies the destination of the 
listing output from the processor, via the M: LO DCB. For META and FORT4, M:LO effectively has no 
defoult assignment. Either an explicit assignment must be made or the ILIST command given to turn on the 
LO-output switch in the user's JIT. Apart from META and FORT4, MrLO defaults to the terminal. 

• COMMENT ON or COMMENT OVER followed by ME, LP, or file name. This command specifies the 
destination of error commentary from the processor, via the M:DO DCB. M:DO defaults to the user's 
terminal. Therefore, COMMENT need not be used unless you want to direct error commentary to a 
destination other than your terminal. 

In the following example, we specify destination files for the META output by using the LIST and OUTPUT com- 
mands, and (for purposes of illustration only) turn off the diagnostic output. We then assemble and execute the 
subprogram, but trop. We do not detect any errors in the source program, so in order to find out if we have as- 
sembly errors (which do show on the listing, however) we Issue a COMMENT command to turn error commentary back 
on. We reassemble, find that we have a syntax error, and correct the line before reassembling again. 



Example 


43. 


Controlling th 


e Destine 


tion of Processor 


Output 


! BUILD COUNTER 


© 








1 


000 




SYSTEM 


SIG7 © 






2 


000 




SYSTEM 


BPM 1© 






3. 


000 


BEG 


LI,1 100© 
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4.000 
5.000 
6.000 X 
7.000 
8.000 © 



STW l.X © 
M:EXIT © 
RES 1 © 
END BEG © 



j_LIST ON LOFILE © 

Before calling META, the user directs listing output to file LOFILE. 

_!_OUTFUT ON BIN @ 

He specifies that the ROM output is to go to file BIN. 

_!_DONT COMMENT © 

He overconfidently turns off error commentary. 

_[_META COUNTER © 

WITH> @ 

IRUN BIN ON CNTRIOO© 

He requests load module output on file CNTRIOO. 

LINKING BIN 
DEFAULT CORE LIBRARY IS NOT NEEDED 
A400 YOU TRAPPED 

An abort message prints indicating the program would not execute properly. 

ICOMMENT © 

The user does not spot any errors in the source, so he issues a COMMENT command to cause 
error commentory from META to appear at the terminal, 

XMETA COUNTER OVER BIN,LOFILE © 

WITH> © 

He calls META again. Files BIN and LOFILE were created when META was previously called, 
so they must be respecifled in order to be recreated or written over, rather than extended. This 
time the error commentary prints at the terminal and indicates that statement 4 is in error. 



01 0000 1 



35060001 N 



STW l.X 



4.000 



**** ILLEGAL CF 

* SO UNDEFINED SYMBOLS 

" ERROR SEVERITY LEVEL: 3 

* ERROR LINES 

4 
_|_EDIT COUNTER© 
EDIT HERE 

* IN 4 © 



He wants to change line 4 and uses the Insert (IN) command to enter a corrected statement. 
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4.000 STW.l X @ 

*END ® 

_[^META, COUNTER OVER BIN.LOFILE S 

WITH> © 

He calls META again. Error commentary will still be directed to the terminal, since the previous 
COMMENT command !s still in effect, 

*N0 UNDEFINED SYMBOLS 



ERROR SEVERITY LEVEL: 



* NO ERROR LINES 



IRm (NP) BIN OVER CNTRIOO ® 
LINKING BIN 

Since there are no errors in the assembly, he reloads and reexecutes the program, to recheck and 
get an updated load module. 

Normal execution is indicated by a return to TEL with no message. 

!OFF @ 



accounting summary 



SET COMMAND 

The general form of the !SET command is given in the CP-VAS Reference Manual, 90 09 07, with descriptions of 
its many options and varied examples of its use. It is a complex command. Several forms, selected for particular 
uses, are as follows: 

• To Assign a public disk File 

SETdcb/fid[;filopt. ..;filopt] 

where 

fllopt is one of the file-option parameters given in Appendix C, Table C-3. Some of these are 

IN — Input file 



OUT - output file 

INOUT - update file 

OUTIN - scratch file 

REL — release on close 

SAVE — save on close 



function 



disposition 



The defaults for the function and disposition parameters are interrelated, as follows: for IN or INOUT 
files, SAVE is the default; for OUT or OUTIN files, REL Is the default. (Note that for on OUT or OUTIN 
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file the SAVE parameter does not actually cause the file to be permanently saved, but merely allows 
SAVE to be effectively specified in an M:CLOSE operation. ) 

• To Assign a Labeled-Tape File or Private Disk Pack 

SET deb dc Pnnnn]/fid[;filopt. . .;filopt] 

where 

dc is a device code: MT - any unit; 9T - 9-track, 7T - 7-track, DP - disk pack. 

^nnnn is a tape or disk pack serial number (I.e., on Internal reel number). 

fid is the file identification of a file on the tope or pack. 

fllopt is as above, under disk file assignment. 



Note that the disposition file options, SAVE and REL, have specialized meanings for tape operations, as 
described in the CP-V/BP Reference Manual, 90 17 64. 

• To Assign a Peripheral Device (Other Than Magnetic Tape) or Private Disk Pack 

SET dcbj ., |[;devopt. . . ;devopt] 

where 

dev is a symblont-output device code: LP - line printer, CP - card punch. 

opib is a system-defined operational label. These are given in Appendix C, Table C-1 (see also 

below). 

devopt Is a device-dependent device option; these are given in Appendix C, Table C-2, and 

mainly concern format control and read/write codes and modes. 

The system-default value of an operational label, e.g., SI, LO, or CO, is set by the Individual installa- 
tion, and normally will differ from on-line to batch mode. In CP-V as distributed, the following opera- 
tional labels and correspondingly named DCBs default on-line to the user's terminal: C, DO, EI, LL, LO, 
OC, SI, SL, and UC. Excepting the special label NO, all other operational labels have no "as-directed" 
default value. The operational label NO has the fixed meaning "no assignment", and while it is in force, 
effectively prevents any default assignment from being applied. This causes any output via a so-assigned 
DCB to be lost, and an immediate end-of-file return on Input. 

• To Clear a User-Set Assignment 

SET dcb[0] 

This form causes any prior assign/merge table entry for the named DCB to be deleted from the table. Thus, 
any system-default assignments are allowed to take effect in subsequent job steps. 



• To Clear All User-Set Assignments 

r[eset] 

This form deletes all previously assigned entries from the assign/merge table. All system default assign- 
ments for all standard system DCBs are In effect for subsequent steps. 
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GENERAL USAGE RULES 

The following usage rules apply in general: 

1 . File or device opfions con be added or respecified, between job steps, for an already assigned DCB if the 
assignment was made by a previous SET, OUTPUT, LIST, or COMMENT command, or a processor -co 11 
parameter. 

2. As stated earlier in this chapter, when assigning a file to any nonsystem-defined, loader-constructed DCB 
(excluding F:101, F:102, . . .F:106 for FORTRAN standard units) you must also specify one of the file- 
option function parameters (IN, OUT, INOUT, OUTIN), and also the disposition parameter unless the 
default is desired. Thus, an output-file assignment for, soy, FORTRAN unit 6 would be as follows: 

ISET F:6 /OUTFIL;OUT;SAVE 

3. No more than 12 concurrent DCB assignments can be in effect via the assign/merge table. If necessary, 
clear any not-currently-needed entries via SET deb. The RESET command resets all standard system DCBs 
to the default assignments. 



Example 44, Setting DCB Assignments and Parameters with the SET Command 



This example illustrates use of the SET command to direct input to and output from an assembly. The user 
obtains source output on tape, a compressed-output deck, a double-spaced output listing on the printer, and 
ROM output on a disk file. 



_!_SET M:SO MT«A123/Z 'i5 

This command will cause the source output from META to go to file Z on the magnetic tape having the 
serial number A123. 

J_SET M:LO L0;SPACE=2 

The user wants the output listing double-spaced. Note that he must first assign M:LO. (But, see the 
META command below, where this assignment is changed.) 

J_SET M:BO /B INOUT @ 

He wants the binary output to go to disk file BINOUT. He could alternatively have used the command: 
J^OUTPUT ON BINOUT 

J_SET M:CO CP @ 

This command assigns the DCB for compressed output to the card punch (utilization privilege is required). 

^META INFILE ON , LP © 
WITH> SO,CO @ 

The user now calls META to assemble a source file. He requests a source listing on the line printer 
(privilege required) and a compressed output deck. 
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J_RUN (NP) BINOUT @ 

He now calls RUN t-o load and execute the program. 

LINKING BINOUT 
I 

Controi returns to TEL, with no error messages having been issued. 



BASIC PROCESSOR REQUIREMENTS 

The BASIC processor uses the following DCBs for its l/O: 

DCB Definition Default Assignment 

User's console (on-line job) 
Cord reader (batch job) 

File 

File 

File 

File 



M:SI 


Source input 


M:EI 


Stream 1 . 


M:EO 


Stream 2. 


M:CI 


Stream 3. 


M:LO 


Stream 4. 



User's console (on-line job) 
Line printer (batch job) 



File 



M:DO Diagnostic output and out- 

put that results from a 
PRINT statement or a LIST 
command. 

M:SO Output that results from a 

SAVE, FILE, LOAD, 
RENUMBER, or CHAIN 
command. 

The assignments for any of these DCBs may be changed via the SET command. For example, the assignment for the 
M:DO DCB for an on-line job may be changed to line printer by the command 

!SETM:DO LP 

If either the M:SI or M:DO DCB has been affected inappropriately by previous processing during the on-line ses- 
sion, it may be reset to the BASIC default assignment by means of the SET deb command. Both of them may be reset 
at the same time via the RESET command. All other DCBs are reset to their BASIC default assignments automatically 
by the BASIC processor. 
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11. CONTROLLING OUTPUT 



GENERAL 

The several outputs from a compilatiori or assembly (or "standardized" user processor) can be selectively turned off 
by a DONT LIST, DONT OUTPUT, or DONT COMMENT command, either before calling a processor or during an 
interrupt of the processor. These specifications retain their effect across job steps, until reset or negated. Outputs 
may be resumed by a LIST, OUTPUT, or COMMENT command, or by specifying output destinations in a MET A, 
FORT 4, or user-processor command. LIST affects the M;LO DCB, normally used for listing output; OUTPUT affects 
the M:GO DCB, normally used for ROM output, and COMMENT affects the M:DO DCB, normally used for diagnostic 
output. (M: DO cannot be affected with the META, FORT4, etc., command parameters. ) 

If you have assigned output to a "symbiont device", such as line printer or card punch, the output is stored on disk 
until you give an explicit or implicit indication that it is complete and ready to be printed or punched. You do this 
explicitly by issuing the TEL command PRINT, or implicitly by logging off. (Note that utilization privilege is 
required for these central-site units, however.) 

DISCONTINUING AND RESUMING STANDARD OUTPUTS 

You may interrupt META or FORT4 and turn off output by one of the following commands: 

• DONT LIST turns off list output. 

• DONT OUTPUT turns off binary output. 

• DONT COMMENT turns off error commentary. 

The DONT LIST and DONT OUTPUT commands may also be given before calling META or FORT4 if these outputs 
are not desired . 

Output may be resumed by one of the following commands: 

• LIST resumes list output as previously specified. 

• OUTPUT resumes binary output as previously specified. 

• COMMENT resumes error commentary as previously specified, or at the terminal by default. 

Each of the above commands remains in effect during a session until you issue another command to redirect output. 
The forms of these commands for explicitly directing or redirecting outputs are given in Chapter 10. 



Example 45. Discontinuing and 


Resuming Output by OUTPUT, LIST, 


and COMMENT Commands 


j^BUILD INFILE © 








The user builds a source 


file 


of Meta-Symbol statements. 




1.000 SYSTEM 




BPM © 




2.000 SYSTEM 




SIG7 © 




3.000 START LI,R1 




1 © 




4.000 SLS.Rl 




24© 




5.000 LW,R2 




Rl© 




6.000 srw,R2 




Y © 
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M:EX1T@ 

RES 1© 

END START @ 



7.000 
8.000 Y 
9.000 
10.000 @ 

_[OUTPUT ON OUTFILE @ 
_^LIST ON LFILE @ 

The user specifies the destination files for binary output and object listing. 

mONT OUTPUT @ 
_!_DONT LIST © 

For his first assembly, he only wants to test for assembly errors, and so he turns off the OUTPUT and 
LIST options. 

iMETA INFILE © 
WITH> © 

He calls MET A to assemble the source file. 



3 01 00000 22000001 N START LI,R1 1 



3.000 



"* UNDEF SYM 



4 01 00001 25000018 N 



SLS.Rl 24 



4.000 



k-k-k* UNDEF SYM 



5 01 00002 32000000 N 



LW.R2 Rl 



5,000 



Y : 

IQUIT l"i' 



» 



The user notices that he forgot to define Rl and R2, and so he interrupts by depressing Y*^ and aborts 
META by typing a QUIT command. 



J_EDIT INFILE © 
EDIT HERE 



He calls Edit to insert definitions into the source file. 

*IN2.5,.l © 

2.500 Rl EQU 1 © 

2.600 R 2 EQU 2 © 

2.700 ® 
*END © 

He then leaves Edit. 
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_!_OUTPUT © 
_[LIST @ 

This time he believes that the program is error-free, and so he now resets the OUTPUT and LIST options. 

_!META INFILE © 

He now reossembles. File INFILE must be respeclfled since M:SI defaults to the terminal at each new 
job step. 

WITH> © 

" NO UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL: 

* NO ERROR LINES 



PRINT COMMAND 

Output directed to the symbiont output devices (card punch and printer) is normally not queued for actual output 
on those devices until you log off. This feature has the advantage of causing all of the output for one job to come 
out together. 

However, you may wont some of your output printed or punched immediately. The PRINT command causes your 
symbiont files to be closed and queued for output at once (if you have the required utilization permission). 

Example 46. Causing Printer or Punch Output to be Queued by Issuing a PRINT Command 



J_COPY KE TO LP © 














The user wants to enter lines 


at the terminal to be 


cop 


ed to the line 


prin 


ter. 


/THESE LINES ARE DIRECTED TO 


THE LINE PRINTER © 










^THEY ARE NORMALLY NOT QUEUED 


FOR 


PRINTING UNTIL THE USER LOGS 


OFF 


■■p- 


^THE FOLLOWING PRINT COMMAND 


WILL 


CAUSE THEM TO 


BE 


PRINTED.© 






_L@F 














The Escape F signals end-of 


-inpu 


t. 










! PRINT © 














This command causes the line prin 
] 


ter output to be 


queued Immediate 


'y. 




The session continues. 















General 91 



12. SAVING/RESTORING CORE IMAGES AND FILES 



GENERAL 

A core image of a program In process, along wihh relevant program context, can be saved on a disk file during an 
Interruption of execution. You might often wont to save the core image of a patched program at one or several 
stages of a complex debugging process, e.g., to ensure against errors in ensuing patches. The saving and reloading 
of core Images is achieved with the ISAVE and !GET commands, shown In the first two examples to follow. 

Although program-l/O file identification information is saved along with the core Image, file-positioning Information 
is not saved (and the files themselves may not be saved if closed automatically by the system). If, however, a given 
program Is not sensitive to these considerations, then SAVE/GET can also be used as a production checkpoint-restart 
mechanism. 

Disk (i.e., RAD or disk pack) storage is the predominant ft le -storage medium for the on-line user, because of the nature 
of remote on-line operation and the central role played by this type of storage in Integrated batch/time-sharing op- 
erating syst-ems such as CP-V. The advantages of disk storage over other types of file media were discussed briefly in 
Chapter 4. Disk files are, however, susceptible to loss in certain types of catastrophic system failures, or "crashes", that 
sometimes occur. Although the system provides extensive, automatic protection against complete file loss (as 
described below), generally on an "all files" basis, you can selectively create backup files anytime you feel this 
action Is indicated. (For example, after creating an important file when working with a relatively new installation 
that has not yet Ironed out all the wrinkles.) 

Files may be saved or backed up either on the standard system save/restore magnetic tape by means of the TEL 
BACKUP command, or on your own private tape, pack, or on punched cards by means of the PCL COPYALL or 
COPY command. 

Another characteristic of disk storage is that its capacity is fixed in a sense that magnetic-tape or punched-card 
storage Is not, and that you can easily misuse it; (1) by not promptly deleting unneeded files (you are normally 
charged for permanent disk space actually used, not the total extent allowed for your use), and (2) by allowing 
little-used files to remain on disk. You can transfer files of the latter class to tapes by the same means used to 
create backup copies — but do not forget to delete them from disk after verification of the copying ! 

SAVE AND GET COMMANDS 

You can take a "checkpoint" of a core Image at some desired point by Interrupting the execution and issuing a 
SAVE command. The core Image of the program and other information that enables the system to reconstruct the 
program's environment (other than l/O-file positioning) are then saved on disk. After you issue the SAVE command, 
the Interrupted program can be resumed by a GO or CONTINUE command. 

Later you can restore the checkpolnted program to core by issuing a GET command. Following the GET command 
bya GO orCONTINUE command causes processing to be resumed at the point at which the checkpoint was taken. 

In the next example, we assemble a program with META but discover coding errors when It does not execute prop- 
erly. Instead of editing the source file and reassembling, we choose to enter patches with DELTA (see Chapter 7). 
To preserve a patched version of the program, we Interrupt prior to execution and issue a SAVE command. The 
potched version is restored by a GET command In Example 48 and executed again. 



ExampI 


e 47 


Saving a 


Core Ima 


ge 


of a 


Program 


(SAVE Command) 


j_BUILD 


INPUT© 














l_ 


000 




SYSTEM 






BPM 


® 




2_ 


000 




SYSTEM 






SIG7 


s 
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3.000 




REF 




M:UC (@) 


4.000 


START 


LI,1 




RETURN @ 


5.000 




STW,1 




EXIT© 


6.000 




LCI 




© 


7.000 




STM.O 




REGS @ 


8.000 




B 




SUBR © 


9.000 


_RETURN 


CW,15 




REGS+15 @ 


10.000 




BNE 




ERROR @ 


11.000 




CW,14 




REGS+14 @ 


12,000 




BNE 




ERROR @ 


13.000 




LI, 14 




BA(REGS) © 


14.000 




LI, 15 




56 © 


15.000 




SLS,15 




24 © 


16.000 




CBS, 14 




© 


17.000 




BNE 




ERROR © 


18.000 




M:EXIT 


@ 




19.000 


_ERR0R 


LB, 2 




ERR © 


20.000 




M:WRITE 


M:UC,(BUF, ERR), (SIZE, *2),(BTD,1)© 


21.000 




M:EXIT 


@ 




22.000 


_ERR 


TEXTC 




'REGISTERS NOT PRESERVED IN SUBR'@ 


23.000 


.REGS 


RES 




16 @ 


24.000 


_SUBR 


LI, 2 




100 © 


25.000 


. 


BDR,2 




$ © 


26.000 


_ 


B 




*EXIT @ 


27.000 


_EXIT 


RES 




1 © 


28,000 


_ 


END 




START © 


29.000 


© 









J_META INPUT ON BO @ 
WITH> SD © 

The user assembles the program, and asks for symbolic debugging code to be produced. 

" NO UNDEFINED SYMBOLS 



ERROR SEVERITY LEVEL: 



"- NO ERROR LINES 
J_RUN BO @ 



LINKING BO 



REGISTERS NOT PRESERVED IN SUBR 



The program error message prints. 
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J_RUN BO UNDER DELTA © 

The user now runs under Delfa because he wants to add patches to the program before executing again. 

LINKING BO 

DELTA HERE 
"ring" 

The Delta debugging processor identifies itself and prompts with a bell. 
BO;S ® 

The user identifies the symbol table associated with the ROM (BO). 

EXIT+20\ STW.l EXIT+19 © 
EXIT+.15\ LI,1 100 2> 
EXIT+.16\ BDR.l $ © 
EXIT+.17\ LW,1 EXIT+19 
EXIT+.18\ B *EXIT ® 
SUBR\ B EXIT+20 © 

He enters patches into the program (see Example 33 for meaning of these commands). 

He depresses CONTROL and Y after the prompt to interrupt Delta. The system echoes a left arrow. 
XSAVE MYJOB @ 

He issues a SAVE command to save the patched program on file MYJOB. 

_!.G0© 

The GO command takes him back to Delta. 

START ;G © 

He issues a Delta command to start execution of the program. (No prompt is given.) 

EXIT AT RETURN + .9 



Delta prints this message on execution of an MrEXIT. 
The user now leaves Delta. 



94 SAVE and GET Commands 



Example 48. Restoring a Checkpointed Program (GET Command) 



_!_GET MYJOB © 

The user restores the checkpointed core image (the patched program on file MYJOB). This file was 
created by the SAVE command in Example 47. 

j_GO @ 

The GO command causes a return to Delta, the processor that was interrupted to perform the SAVE. 

START ;G @ 

The user initiates execution. (No prompt Is given for this line.) 

EXIT AT RETURN + .9 

The program completes execution. 



BACKUP COMMAND 

The BACKUP command provides a means of creating backup files. Files are copied to the standard system backup 
tape. Note that the usage of BACKUP may be subject to rules and restrictions conditioned by specific installation 
practices concerning the saving/restoring of files. 

A keyed file called MAILBOX in the user's account will contain completion messages resulting from the backup process. 

The next example illustrates use of the BACKUP command. This example also shows that we must wait for the backup 
process to complete before finding out what Is in the MAILBOX file. 

Example 49. Saving a File on the Standard System Backup Tape 



j_BUILD MYFILE © 

The user builds file MYFILE. 

j_BACKUP MYTILE © 

He Issues a BACKUP command to copy the file on the system backup tape. 

J_COPY MAILBOX © 

i 

300 FILE DOES NOT EXIST. 

He wants to see what is In the MAILBOX file, but this file does not yet exist because the backup process 
Is not complete. 

_!_COPY MAILBOX © 

He waits a minute or so for the backup process to complete then issues the COPY command again. 
16:18 MAY 25. '71 BY ABCD ON SN45A1 BACKED UP FILE MYFILE 

The completion message in file MAILBOX now prints. 
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COPYALL AND COPY COMMANDS 

SAVING ON TAPE 

Many times you will want to save one, several, or all of your files on magnetic tape, in addition to those implied 
by the "proper usage" guideline offered near the beginning of this chapter. For instance, if you were going on 
on extended vacation, you might want to copy all your disk files to tape and thus save disk storage charges. Or, 
if you are making many versions of a file, perhaps many assemblies, you may want to back up the original file on 
tape. In the next example, the user transfers all the files in his account to tape and pulls them off as needed in 
the session. He also transfers a single, additional file to the tape. The example shows the use of CP-V labeled tape 
rather than free-form tape. Using labeled tape, the user can request his files by name from the tape, as he would 
call them by name from his disk directory. With free-form tape, he would have to know the ordinal positions of 
the files on the tape, and space forward or backward the appropriate number of files before he could read or write 
the files he wanted. (This example is illustrative of what con be done, but not necessarily of what may normally 
be done, since it implies usage of a central-site resource in a manner that may or may not be al lowed in a given 
installation.) Note that copying one file or the entire account to tape does not automatically delete the file(s) 
from disk; disk files must be explicitly deleted by command. Also, tape files are no longer "in the system". That 
is, the system "knows" only of files in the user's account on disk; the user is responsible for knowing the tape's 
label or number, and for notifying the central-site operator of the some (see Chapter 14). 

Remember that any utilization of magnetic tape, as well as any other central-site resource, requires a prior 
permission by the installation. 

See the CP-V/TS Reference Manual, 90 09 07, Chapter 5, for a description of the Rewind (REW) and Space- 
to-EOT (SPE) commands shown in the next example. 



Example 50. Transfer of All Files in User's Account to Labeled Tape 



_!_PCL @ 
PCL POO HERE 
<LIST @ 
ARCSINE 



DATAFIL 



JOBFIL 



ROMFIL 



SOURCE 



V PRIME 



The user lists the names of the files in his disk account. 



He rewinds the tape (*3B96) he Is going to write on, to be certain it is positioned to start of tape. 
This assumes, of course, that the tape has been mounted at the computer site. See Chapter 14 on 
user-operator communication. If the tape already contained files he wanted to keep, he would 
instead want to skip to the position following the last file on the tape by issuing the command 
<SPE LT#3B96. 

<COPYALL TO LT#3B96 @ 

He copies all the files in his account, in succession, to labeled tape (LT) "3B96, 

<REW #3B96 © 

He rewinds tape ''3B96 that he has just written on before listing it. He visually compares the I ist with 
the one he received when he listed the disk directory. 
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<LIST LT#3B96 @ 



ARC SINE 



DATAFIL 
JOBFIL 



ROMFIL 



SOURCE 



VPRIME 



«^COPY ME TO NEW © 



The user creafes a new file from the terminal. 

<SPE LT#3B96 © 

He spaces labeled tape *3B96 to the mark following the lost file on the tope. 

£COPY NEW TO LT#3B96/NEW @ 

He adds file NEW to labeled tape *3B96. 

£REW -:f3B96 © 
<_LIST LTf^3B96 © 

ARC SINE 



DATAFIL 



JOBFIL 



ROMFIL 



SOURCE 



VPRIME 



NEW 



He rewinds tape *3B96 and lists the names of Its files. PCL has successfully added file NEW after the 
last file written to tape, VPRIME, 



^DELETEALL ■^ 
DELETEALL? 
^YES$ © 

7 FILES DELETED 



Satisfied that his files are safely stored on tape, he now deletes all files in his disk account. PCL 
requires a "YES$" verification of the DELETEALL request, and upon its receipt, PCL deletes all of the 
user's files and so notifies him. 



COPYALL and COPY Commands 97 



<REW #3B96 @ 

<COPY LT#3B96/NEW TO INPUT @ 




























The user wishes ^o use file NEW as in 
back to his account with a new name. 


3ut to a 
INPUT 


processor la 


ter in the 


session 




He 


ca 


lis 


it from the 


tape 


<REM #3B96 © 




























He issues the REMOVE command, 
to the control-site operator. 


wh 


ich rewi 


nds the 


tape 


and 


automatica 


ly 


issues 


a 


'dismount" 


message 


£END @ 




























! 
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13. SUBMITTING BATCH JOBS 



BATCH COMMAND 



The BATCH command is used to submit a batch [ob deck stored on a file to the batch input stream. This job deck 
must include all appropriate batch control cards that would be needed for normal batch job submission. 



Example 51. Submitting a Job via BATCH Subsystem for Execution 



j_EDIT @ 

EDIT HERE 

*BUILD BATCHIN © 

The user builds a source program that he wishes to assemble In the batch environment. 

SIG7 © 
BPM © 
M:LO @ 
M:L0,(BUF,MES),(SIZE,9)® 

THIS LINE CONTAINS AN ERROR ® 
'IT WORKS. ' @ 
START © 

* BUILD J OB A© 

He builds a fi le containing a batch job-control deck that will assemble the file called BATCHIN. 

1.000 !JOB © 

2.000 lASSIGN M:SI, (FILE, BATCHIN) © 

3.000 '.ASSIGN M:BO, (FILE, BINARY) © 

4.000 lASSIGN M:DO, (FILE, ERRORS) ® 

5.000 IMETASYM SI, BO, LO © 

6.000 © 
*END © 

J_BATCH JOBA © 
ID=0028 SUBMITTED 



1,000 


SYSTEM 


2.000 


SYSTEM 


3.000 


REF 


4.000 START 


M:WRITE 


5.000 


M:EXIT © 


6.000 


ERROR 


7.000 MES 


TEXT 


8.000 


END 


9,000 © 





9:13 MAY 26, '71 



He submits the batch job he has just created. The [ob identification (ID) prints as a hexadecimal value. 
Note that the JOB command did not specify an account, user name, or priority. When these parameters 
are omitted, they are supplied by the system and default to the logged-on account, user name, and the 
highest priority authorized that user. 
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CANCEL COMMAND 

If the user wishes to cancel a job previously submitted by the BATCH command, he may do so by using the CANCEL 
command. 

CANCEL jid 

where jid is the job identification that printed just after the job was submitted. 

JOB COMMAND 

The JOB command is used to ask for the status of a batch job. The system responds that the job is either completed, 
running, or still waiting to be run. The format of the command is 

JOB jid 

where jid is the job identification that printed just after the job was submitted. 



Example 52. Using the JOB Command 



UOB 28 IE' 

The user requests the status of the job submitted In the previous example. The job identification 0028 
is the same as the one reported when the job was submitted using the BATCH command. 

WAITING: 1 TO RUN 

The system answers that there is one batch still to be run before this job is run. 



Later the user asks again. 



COMPLETED 



Now the job is complete. 



!COPY ERRORS ON ME 



The user displays the diagnostics from the job at the terminal . Note that M:DO was assigned to file 
ERRORS in the job-deck JOBA. 



ERROR THIS LINE CONTAINS AN ERROR 



6.000 



UNDEF SYM 






ILLEGAL AF 



UNDEFINED SYMBOLS 



* 


THIS 
ERROR SEVERITY LEVEL: 


3 


* 


ERROR LINES 
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14. COMMUNICATION WITH THE OPERATOR 



MESSAGE COMMAND 

The MESSAGE command causes a message to be sent to the central-site computer operator. The message may be 
from 1 to 44 characters in length. 

The format of the command is 

I M[ESSAGE] message -text 

If the message-text exceeds 44 characters, the first 44 characters are transmitted rather than reinsertion of the 
message being required. 

In the next example, the user informs the operator that he needs a scratch tape. 
Example 53. Sending a Message to the Operator 



^MESSAGE READY SCRATCH TAPE TO 


BECOME i;^055.@ 


















The user sends a message to th 


e computer 


operator 


request 


ng that 


he be 


ready 


to mount 


a scratch 


tape. 


_!_BUILD DATAPOINTS ® 






















He builds file DATAPOINTS. 






















_!_COPY DATAPOINTS TO FT'WOSS @ 






















He requests that the file to be 
informs the operator where to 


copied to 
mount the 


a free-for 
requested 


m tape 
scratch 


with the 
tape. 


seria 


numb 


er 9055. 


The 


system 



MESSAGES FROM THE OPERATOR 

The computer operator can send o message to an Individual terminal or broadcast a message to all users. When he 
broadcasts a message, the message is placed into the right-hand part of the page title for the terminols and it will be 
seen by a user when he receives a new page heading. A message sent to an individual terminal may appear anywhere 
in the user's output. 

Note: If the PLATEN command was used to turn page headings off, the broadcast message will not appear. 

In the next example, the user receives a message informing him that the system will soon go off. He issues a BACKUP 
command before logging off to Insure that his latest files will be saved. This action may not really be necessary, de- 
pending on installation practice; the system normally will save all files automatically before going off. 

Example 54. Receiving a Message from ifie Operator 



!_BUILD XYZ © 

The user builds a source file. 
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1.000 




SYSTEM 


BPM © 














2,000 




SYSTEM 


SIG7 © 














3.000 




REF 


M:UC,M:LO @ 














1l' 

He wants to 
CONTROL 


con t 
und 


inue file building (or f 
. to cause a page eject 


rocessing) on a 


new 


page 


so 


he simultaneously depresses 




(page eject) 




















23:45 05/26/71 


JONES ABC 1BB-F[17] 


CP-V WILL GO 


OFF 


AT 2400 


CP-V WILL GO OFF AT 2400. 


Included as part 
This message has 


of the page heading is 
been sent to all users. 


the message from th 


e ope 


rotor 


IBACKUP XYZ © 




















The user decides 
last file. 


to terminate his processing at this time, and he 


uses 


a BACKUP 


command to save 


his 


j_OFF (g: 




















-accounting summary- 
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APPENDIX A. TEL COMMAND SUMMARY 



Table A-1 is a summary of TEL commands. The first column gives the command format, the second column gives the 
command's function and option codes. For the structure of file names (fid, rom, Imn) see Table B-1 . 



Table A-1. TEL Command Summary 



Command 


Description 


BACKUP fid 


Saves the specified file on a system tape. In case 
of a crash in which files are lost, files on the tape 
wll 1 be restored. 


BATCH fid [,fid]. . . 


Enters the specified file(s)in the batch job stream. 


B[uILD] fid 


Accepts a new file from the terminal. 


BYE 


Disconnects the terminal from the system and pro- 
vides an accounting summary. This command is 
equivalent to the OFF command. 


CANCEL jid 


Cancels a previously submitted batch job. 


COMMENT [o;;^^^ 


list 


Directserror commentary to the specified device, or 
counteracts the preceding DONT COMMENT com- 
mand. Options: list maybe fid, LP, or ME. 


CONTINUE 


Continues processing from the point of inter- 
ruption. This command is equivalent to the GO 
and PROCEED commands. 


cTdpyI Alu^Y/f.A^U)]^ fMrcalT 


ir-dTf-'ii 




Copies file between devices or between RAD 
storage and devices: 

Options: 

d may be CP, DC, DP, FT, LP, LT, or ME. 

s may be a data code (E, H); a data format 
{X,C); a mode (BCD, BIN,7T,9T, PK, UPK, 
SSP, DSP, VFC, NC, FA, NFA, TX, DEOD, K); 
a sequence (CS, NCS, LN, NLN); an account 
(RD,WR); or selection (x-y). 




L^. , J -LV/JL' ■'" U-'/JL/""LV-'/JJ- • ■ 


JL'°Ll-'^J 






— [/nd[(s)]][,fid 

1— d[(s)][/fid[(s)]] 


[(s)]]...]... 


"to 

[over 




d[elete] 


[DC/] 
DP[#serial no.]/ 


fid[,fid]. .. 


Deletes the specified files. 


DELTA 


Calls the DELTA processor. 


di[spu\y) 


Lists the current values of various system 
parameters. 


DONT COMMENT 


Stops error commentary output. 


DONT LIST 


Stops listing output. 


DONT OUTPUT 


Stops object output. 


E[DIT] fid 


Calls Edit to modify a file. 
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Table A-1. TEL Command Summary (cont.) 



Command 


DescripHon 


END 


Terminates the current job step. This command 
is equivalent to the STOP and QUIT commands. 


FORT4[sp] [g(;'^^[rom][,IIst]] 


Compiles a Xerox Extended FORTRAN IV source 
program . 

Options: 

sp may be fid or ME. 

rom may be fid only. 

list may be fid, LP, or ME. 

Output may be interrupted and continued by 
the following commands: 

LIST DONT LIST 
OUTPUT DONT OUTPUT 
COMMENT DONT COMMENT 
CONTINUE GO 


GET fid 


Restores the previously saved core image. This 
command is equivalent to the RESTORE command. 


GO 


Continues processing from point of interruption. 
This command Is equivalent to the CONTINUE 
and PROCEED commands. 


JOBjid 


Requests the status of remotely entered jobs. 


L 


LT[#reel-;d][(s)] 

[DC [.accf] M 

LT[#serial no.] [(s)]/f;d[(s)][,fid[(s)] . . .] 

fid[{s)][,nd[{s)]..; 

DP[#reel-id][(s)] 

DP[#serial no.] /fid[(s)] [,fld[(s)] . . .] 

FT[#serial no.] [(s)] 




Lists file names and, optionally, attributes from 
the account directory, tape, or disk pack. 

Option: s may be A, EA, 7T, or9T. 




-INK [codes] rom [,rom] . . . [,rom] /-.yco 1"^" " 






Forms the load module as specified. 

Options: 

library search: (L), (NL), (Pi), (FDP),(NP) 
default: (L),(P1) 

display: (D), (ND), (C), (NC), (M), 
(NM) 
default: (D),(C),(NM) 

symbol tables: (I),(NI) 
default: (I) 

rom may be fid or $; parentheses enclosing roms 
cause merge of symbol tables. 

lid must be a library fid. 




[;lid[,lid]...[,lid]][UNDER FDP] 




LIST 


ON ,. 
OVER '"^. 


Directs the listing output to the specified device 
or counteracts the preceding DONT LIST command. 

Options: list may be fid, LP, or ME. 
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Table A-1 . TEL Command Summary (cont.) 



Commond 



Description 



'" M [oVERt^HC'I'^Oj 



Initiates execution of a load module. 

Options: 

Imn has the form; 

name [. [account] [. password]] 

absence of period and account specifies 
system account, 

presence of period and absence of account 
specifies log-on account. 

M:SI DCB is assigned to sp. 

M:GO DCB Is assigned to rom. 

M:LO DCB is assigned to list. 



M [ess age] text 



Sends the specified message to the operator. 



META [sp] [°y£^[rom][,list]j 



Assembles the specified source program. 

Options: 

sp may be fid or ME. 

rom may be fid only. 

list may be fid, LP or ME. 

Output may be interrupted and continued by 
the following commands: 



LIST 

OUTPUT 
COMMENT 
CONTINUE 



DONT LIST 
DONT OUTPUT 
DONT COMMENT 



OFF 



Disconnects the terminal from the system and 
provides an accounting summary. This command 
is equivalent to the BYE command. 



OUTPUT 



ON 
OVER 



Directs object output to the specified device, 
or counteracts the previous DONT OUTPUT 
command. 

Option: rom may be fid only. 



PASSWORD xxxx 



Assigns a new log-on password for the user. 
xxxx is 1-8 characters. Any of the following 
characters may be used: A-Z a-z 0-9 -^ $ 
*%:*§'- backspace 



PLATEN [w][,l] 



Sets the value of the terminal platen width and 
page length or displays the terminal platen width 
and length page values. 



PRINT 



Sends print output to the line printer and punch 
output to the punch. 



PROCEED 



Continues processing from the point of inter- 
ruption. This command Is equivalent to the 
GO and CONTINUE commands. 
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Table A-1. TEL Command Summary (cont. ) 



Command 



Descriptfon 



Processor colls 

APL FLAG 

BASIC FORT4 

COBOL META 

DELTA PCL 
EDIT 



These calls are entered while TEL is in control 
of the terminal. They turn over control of the 
terminal to the processor specified. 



q[uit] 



Terminates the current job step. This command 
is equivalent to the STOP and END commands. 



r[eset] 



Resets all DCBs back to their system default 
values. 



RESTORE fid 



Restores the previously saved core image. This 
command is equivalent to the GET command. 



RUN 



[codes] [rom[,rom]. . . [,rom]] 1^^ ^ ^^ lmnj[;lid] 



[,lid]...[,lid]][l 



UNDER 



delta! 

FDP J 



Loads the specified load module and starts 
execution. 

Options: 

library search: (L), (NL), (Pi), (FDP), (NP) 
default: (L),(P1) 

display: (D), (ND), (C), (NC), (M), 

(NM) 
default: (D), (C), (NM) 

symbol table: (I), (NI) 
default: (1) 

rom may be fid or S; parentheses enclosing roms 
cause merge of symbol tables. 

lid must be a library fid. 



"- IoverI "■' 



Saves the current core image on the designated 
file. 



SET deb [O] 



SET deb 



SET deb 



opiabel 
device 
tapecode[tapeid] 



tapecode [tapeidj/ftd 
f i lecode [packid] /f id 



[;dopt[;dopt]...[;dopt] 

[;fopt[;fopt]. . .[fopt]] 



Resets the current assignment of the specified 
deb back to the system default. 

Options: see Tables C-1, C-2, and C-3. 



s[tart] 



[u[nder delta]] 



Loads a load module into core and starts exe- 
cution of the program, either with or without 
an associated debugger. 



st[atus] 



Displays the current accounting values. 
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Table A-1. TEL Command Summary (cont. ) 



Command 


Description 


STOP 


Terminates the current job step. This command 
is equivalent to the END and QUIT commands. 


TABS 


Displays the simulated tab stop settings. 


TABSs[,s]...[,s] 


Sets the simulated tab stops at the terminal. 


TERMINAL type 


Sets the terminal type for proper l/O transla- 
tions. Type may be 33, 35, 37, 7015, EAPL, 
ESTD, SAPL, or SSTD. 


TERMINAL STATUS 


Lists the terminal type and the current values 
of parameters associated with its operation. 


U 


Causes the words UNDER DELTA to be inferred 
in the next command. 
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APPENDIX B. FILE IDENTIFIERS AND THEIR PARTS 



A file identification (fid) consists of a file name and optionally on account and/or a password. Special types of 
files are on Imn (load module) which is produced as a result of a LINK or RUN command, and a rom (relocatable 
object module) which is produced by an assembler or compiler. Table B-1 illustrates the structure of a fid. 



Table B-1. File Identifiers and Their Parts 



Symbol 


Structure 


Imn 


a file identifier (fid) that names a load module. 


rom 


file identifier (fid) that names a relocatable object module. 


fid 


name [.[account] [.password]] 


name 


1 to 12 characters of the X character set. 


account 


1 to 8 characters of the X character set. 


password 


1 to 8 characters of the X character set. 


X character set 


A-Z a-z 0-9 $ * % : S - 


The usage "name. " is valid onl 


y when the fid is an Imn used as a command verb (see Chapter 8). 



108 Appendix B 



APPENDIX C. SET COMMAND CODES 

Tables C-1 through C-3 define the codes which may be used as options in the SET command. 

Table C-1. DCB Assignment Codes - SET Command 



Type 


Codes 


Description 


Operational Label 


BI, BO, C, CI, CO, 
DO, EI, EO, GO, LL, 
LO, OC, PO, SI, SL, 
SO, UC 

NO 


When the DCB is assigned to one of the system 
operational labels, the actual device con- 
nected to the DCB Is that implied by the 
operational label, if any, for on-line mode. 

No assignment, i.e., no default is to be 
applied. 


Device 


CP 
LP 
PL 


Card punch. 
Line printer. 
Plotter. 


Magnetic Tape (tapecode) 


9T 

7T 
MT 


9-track tape. 
7-track tape. 
Any magnetic tape. 


Secondary Storage (filecode) 


DC 
DP 


Any data file. (This is the default code if no 
other code Is given.) 

Disk pack storage. 



Table C-2. Device Options - SET Command 



Format 


Description 


TAB =tab[,tab]. . .[,tab] 


Specifies simulated tab stops and Is followed by a list of up to 16 decimal 
numbers, separated by commas, giving the column position of the stops. If 
all 16 stops are not specified, the stops given are assigned to the first stops 
and the remainder are reset. 


LINES = value 


Gives the number of printable lines per page and is a single decimal value. 
The maximum value Is 255. 


SPACE = value 


Gives the number of lines of space after printing and Is a single decimal 
value. Values of or 1 result In single spacing. The maximum value Is 255. 


DRC, NODRC 


Turns the special formatting of records on and off. DRC specifies that the 
Monitor is not to do special formatting of records on read or write operations. 
NODRC specifies the Monitor Is to do special formatting. If neither DRC 
nor NODRC is specified, NODRC Is assumed by default. DRC used In con- 
junction with BIN will invoke the transparent mode. (See Transparent Mode 
Section of Chapter 10 in CP-V/TS Reference Manual, 90 09 07. ) 


VFC, NOVFC 


Controls the formatting of printing by using the first character of each record. 
VFC specifies that the first character of each record is a format -control char- 
acter. NOVFC specifies that records do not contain a format -control chor- 
acter. NOVFC Is assumed by default. 


COUNT = value 


Turns on page counting and specifies the column number at which the page 
number Is to be printed. 
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Table C-2. Device Options - SET Command (cont.) 



Format 


Description 


BCD, BIN 


Controls the binary-EBCDIC mode for device read and write operations. BIN 
used in conjunction with DRC will invoke the transparent mode. (See Trans- 
parent Mode Section of Chapter 10 in CP-V/TS Reference Manual, 90 09 07. ) 


FBCD, NOFBCD 


Controls the automatic conversion between external Hollerith code and in- 
ternal EBCDIC code (FORTRAN BCD conversion). NOFBCD is assumed by 
default. 


PACK, UNPACK 


Controls the packed or unpacked mode of writing 7-track tape. PACK Is 
assumed by default. 


DATA = value 


Controls the beginning column for printing or punching and is a decimal 
value. The maximum value is 144. 


SEQ = value 


Specrffes that sequence numbers are to be punched in columns 77-80 of 
punched output. Four characters of nonblank sequence identification may 
be given for columns 73-76. Fewer than four characters are left-justified 
and filled with blanks. 


L,NOL 


Identifies the device type. L specifies that the device must be listing type. 
NOL specifies that it need not be listing type. NOL is assumed by default. 



Table C-3. File Options - SET Command 



Type 


Format 


Description 


Organization 


CONSEC 

KEYED 

RANDOM 


Consecutive record organization. 

Keyed record organization. 

Contiguous granule allocation, addressed 
by relative block. 


Access 


SEQUEN 
DIRECT 


Records will be accessed sequentially. 
Records will be accessed by key. 


Function 


IN 
OUT 
INOUT 
OUTIN 


File is read only. 
File is write only. 
File is to be updated. 
File is scratch. 


Disposition 


REL 
SAVE 


OUTor OUTIN file is to be released on closing. 

OUTor OUTIN file is prepared to be saved on 
closing. 


Size 


RSTORE = value 


Specifies the number of granules allocated to 
the RANDOM file. 


Storage Control 


CYLINDER 


Specifies that the data blocks of a public 
file are to be allocated from public disk 
packs having cylinder allocation. 
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Table C-3. File Options - SET Command (cont.) 



Type 


Format 


Description 


Key Storage 


NOSEP 


Specifies that index blocks of a public file 
are to be allocated in the same manner as 
data blocks. (Disk pack if possible; other- 
wise RAD). 


Expiration 


EXPIRE = 


mm,dd,yy 

ddd 

NEVER 




Specifies either an explicit expiration date, 
the number of days to retain the file, or 
that the file is never to expire. 
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APPENDIX D. LINK AND RUN COMMAND CODES 



Tables D-1 and D-2 define the codes thaf may be used in the LINK and RUN commands. 



Table D-1. Library Search Codes 



Code 


Meaning 


(L) 


Specifies that the system librory is to be searched to satisfy external references that 
have not been satisfied by the program. (This is the default option.) 


(NL) 


Specifies that a system library search is not required. 


(PI) 


Specifies that the ith public core library is to be searched for unsatisfied external 
references. Default is to PI if no other public core library is specified. Only one 
public library may be associated with a program. 


(FDP)or (PO) 


Specifies that the FORTRAN Subprogram library PO, that includes the Debug rou- 
tines, is required. 


(NP) 


Specifies that a public core library is not required. 


Note: The sequence of the library search is as follows; User libraries are searched first, the public library 
Is associated, then the system library is searched. 



Table D-2. Error Displays 



Code 


Meaning 


(D) 


Specifies that all unsatisfied internal and external symbols are to be displayed at 
the completion of the linking process (including library searches, if specified). The 
unsatisfied symbols ore identified as to whether they are internal or external and to 
which module they belong. 


(ND) 


Specifies that the unsatisfied internal and external symbols are not to be displayed. 


(C) 


Specifies that all conflicting internal and external symbols are to be displayed. The 
symbols are displayed with their source (module name) ond type (internal or external). 


(NC) 


Specifies that the conflicting symbols are not to be displayed. 


(M) 


Specifies that the load map is to be displayed upon completion of the linking process. 
The symbols are displayed by source with type resolution and value. 


(NM) 


Specifies that the load map is not to be displayed. 


Note: The normal default options are D, C, ond NM. 
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APPENDIX E. SPECIAL TERMINAL KEYS 



Certain terminal keys, key sequences, and key combinations cause action to be taken otiier than simple transmission 
of the choracter. Table E-1 illustrates these key sequences and the action produced. 



Table E-1. Special Terminal Keys 



Key Sequence 



Action Produced 



.EiCj 



@1 or ic 
@L or L= 

^ /^ 

gs 

©T 
©U 



X^ 



yC 



@) 

@Q 



Sets or resets the flag that controls echoplex output. 

Causes end-of-file action on input. 

Functions as a tab key. 

Causes spacing to a new page and printing of new page heading. 

Simulates a local line feed. No activation occurs. 

Sets or resets the flag that controls space-insertion mode. 

Sets or resets the flag that controls tab simulation. 

Sets or resets the flag that controls translation of lower case characters. 

Erases cun-ent partial input line. 

Erases all pending input and output including messages typed ahead. 

Causes an interrupt and return of control to processor, if processor has break control; 
otherwise control goes to TEL. More than three BREAKs cause return of control to TEL. 

Causes a carriage return. 

Deletes the last character received. 

Causes an interrupt and return of control to TEL. 

Sets or resets a flag that controls tab relative mode. Input messages are adjusted to 
compensate for carriage offset at beginning of input. 

Shifts to lower cose. All subsequent input is translated as lower case until instructed to 
shift to upper case. 

Shifts to upper case. All subsequent input is translated as upper case until instructed to 
shift to lower case. 

Requests system acknowledgement. The system will respond immediately with two 
exclamation points (! !), 
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APPENDIX F. USE OF THE 2741 TERMINAL 



This appendix is intended for the person who would like to use the CP-V Time-Sharing Users Guide, but can not 
because his terminc! is a 2741 terminal or a terminal that is designed to operate like a 2741. Not all features of 
the 2741 ore discussed —only those that are needed to do the examples in the User's Guide. For a more detailed 
discussion of the differences between the 2741 and Teletype terminals, see the CP-VAS Reference Manual, 90 09 07. 

It is recommended that you do each of the examples in this appendix at your terminal to be sure that you understand 
them. Then turn back to the front of this User's Guide. When doing the examples, use the 2741 equivalent where 
needed instead of the Teletype entry. Differences between Teletype and 2741 control characters are summarized in 
the CP-VAS Reference Manual, 90 09 07. 

CONTROL CHARACTERS 

All time-sharing terminal devices have at least one key on their keyboard that allows them to send special control 
messages to the Monitor. These messages are called control characters. On the 2741 terminal, most control char- 
acters are sent by first pressing an alphabetic key and then pressing the ATTN key. The Monitor signals the user 
that it has received the control character by backspacing and underscoring the letter he typed. It then performs 
whatever function the user has asked for. 

For the remainder of this appendix, the sending of a control character will be described by specifying the letter, 
followed by the symbol that represents the ATTN key ((43)). For example, the user mayrequest that his current line 
of input be retyped by entering the letter r, followed by ATTN. This is presented here as the r @) sequence. 

Table F-1 summarizes the differences between 2741 terminals and Teletype terminals. You will find this table helpful 
throughout the manual. As you encounter each Teletype control character in the text, you will be able to choose 
the appropriate 2741 equivalent. 



Table F-1. 


Summary of Differences Between 2741 ar 


d Teletype Services 




Function 


Teletype 


2741 


Get log-on message 


BREAK 


* and CRLF if dialing up. 
line is already connected. 


ATTN if 


Erase line 


ESC X 


None 


Tab relative 


ESCC 


C ATTN 


Suppress lowercase 


ESCU 


U AHN 


Uppercase shift 


ESC ( 


(ATTN 


Lowercase shift 


ESC) 


) ATTN 


Erase last character 


RUBOUT 


BACKSPACE ATTN 


Tab 


ESC I, CONTROL I 


TAB 


End of input 


FS, RS, US, GS (l''', n", 
Ocs, M") 


SPACE ATTN 


Line continuation 


ESC CR, ESC LF, LOC CR 


N ATTN 


Retype 


ESC R 


RATTN 


Toggle tab simulation mode 


ESC T 


T ATTN 


Toggle space insertion mode 


ESCS 


S ATTN 
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Table F-1. S 


jmmary of Differences between 2741 and Teletype Services (cont.) 




Function 


Teletype 


2741 


End of file 


ESC F 


F ATTN 


Monitor escape (to TEL) 


ESC ESC, CONTROL Y, ESC Y, 
or 4 BREAKS 


FourATTNs. Also, Y ATTN 


if input. 


Break 


BREAK 


B ATTN on input or ATTN on 


output. 


Toggle backspace edit 
mode 


None 


O ATTN 


Form feed 


ESC L 


LATTN 


Half duplex paper tape 


ESC P 


None 


Toggle ECHO mode 


ESC E 


None 


Acknowledge 


ESC Q 


None 


Erase all input and 
output 


CONTROL X 


X ATTN 



LOGGING ON 

To log on to CP-V on a 2741 terminal, you must first dial the phone and place the handset in the audio-coupling 
device. When you have established contact with the computer (In most cases, this is signaled by the unlocking of 
the keyboard) you must identify your terminal's specific character set by typing an asterisk, followed by a carriage 
return. CP-V will then be able to communicate meaningfully with your terminal, CP-V responds to your terminal 
identification with a request for you to log on. 

*@ 

XEROX CP-V AT YOUR SERVICE 



ON AT 22 :29 SEP 26, '72 
LOGON PLEASE: 1234, JONES® 



Note that Jones was typed with all uppercase letters. This Is required unless you inform the system that you wish 
all alphabetic characters to be treated as uppercase. The exclamation point indicates that your log-on has been 
accepted and the system is now ready to accept TEL commands, 

SUPPRESSING LOWERCASE LEHERS 

There are many cases where lowercase letters will not be accepted in lieu of uppercase letters. The log-on sequence 
described above is one example. If lowercase letters are used when logging on, an error message is output. To 
avoid this problem the user must either remember to use uppercase letters when required or enter the u (JnN) sequence, 
which suppresses the lowercase letter capability and causes the system to treat all letters as if they were uppercase. 



XEROX CP-V AT YOUR SERVICE 



ON AT 22 :57 SEP 26, '72 
LOGON PLEASE: 123A, Jones © 
ACCOUNT/ID 1234/.iones? 
LOGON PLEASE: ul234,jones© 
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In this example, the user forgot to use uppercase letters when he logged on. The system responded with on error 
message and asked the user once again to log on. This time the user entered the u @) sequence, requesting that all 
letters typed be accepted as uppercase letters. He then reentered his account and id, and it didn't matter whether 
he used uppercase or lowercase letters. If he wished to use lowercase letters loter in the session, he could reset 
the lowercase suppression by entering another u (Jitn) sequence. 

The u @) sequence was entered by typing the letter u, and then pressing the ATTN key. The system acknowledged 
receipt of the sequence by backspacing and underscoring the u. 

CORRECTING TYPING ERRORS 

Each character that you type while logged on to CP-V is sent when you press the key. However, in most cases CP-V 
simply stores what you type until you press the carriage return. At that point, the entire line of information is pro- 
cessed. As a result, corrections can easily be made at any point in a line of input prior to pressing the carriage 
return. 

The backspace (^ sequence most often is used to make single corrections to typing errors. To correct the last 
character typed, press the backspace key, then the ATTN key. The letter you now type will replace the letter that 
you are typing over. 

_!_build sample © 

1 .000 oooooi @ 

2.000 © 
_!_copy sample @ 
00000 I 



In this example, a file name "sample" is created using the TEL BUILD command. The file contains one record, and 
was typed originally as six letter o's. A backspace (S^) sequence was entered, and the last o replaced with an I. 
When the TEL COPY command was used to copy the file to the terminal, the file was printed in all uppercase letters. 
This happened because we had used the u @) sequence earlier to cause all letters to be treated as uppercase. If you 
wish to delete more than one character, simply enter the backspace @) sequence once for each character to be 
deleted. 

_!_build samp lei ^ 

1 .000 ooodidii @ 

2.000 ® 
_!_copy samplel © 
OOOIII 

In this example, six letter o's were entered in the only record of a file named "samplel". Before enteringa carriage 
return, however, three successive backspace (J™) sequences were entered. Three letter i's were then typed to re- 
place the deleted characters. Again when the file was output at the terminal by the TEL COPY command, all upper- 
case letters were typed since the earlier u (i™> sequence was still in effect. 

iuBUILD newfile © 



ooll i 
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At this poinf, a u (J™) sequence was entered so that typed lowercase letters would no longer be converted to 
uppercase. As a result, the TEL BUILD command hod to be typed in uppercase. Also, tt is important to note that 
the nome of this file is "newfile" and that it can only be referred to in lowercase letters. In the only record in 
this file, six letter o's were typed, then four backspace (iJ2S> sequences were entered. Two uppercase I's were typed, 
followed by a space, one lowercase i, and a carriage return. The result was a record containing ooll i. 

USING TABULATION 

The TAB key on the 2741 terminal operates in the same way as the TAB key on a standard typewriter. Each time the 
TAB key is pressed, the carrier moves to the next tab stop. The place where the carrier stops is determined by the 
physical tab setting on the machine itself. In addition to this typical typewriter feature, the 2741 also sends a tab 
character to CP-V each time the TAB key is pressed. When information is being typed from a file, a tab character 
causes the carrier to move to the next tab stop on the machine just as pressing the TAB key would do. 

J_build samples @ 

1 .000 one Qr two Q three Q four © 

2.000 ® 
J_copy samples S' 
ONE TOO THREE FOUR 



In this example, a file named "sampleS" is created. The physical tabs on the terminal were set to every five posi 
tions (i.e., 5, 10,. . . ). The file was then copied bock to the terminal. If we change the physical tab stops on 
the terminal to every fifteen positions (i.e., 15, 30, . . .) and copied the file again, the following would result; 

Icopy samples 'S 

ONE T^^fO THREE FOUR 



In this example, the file named "sample3"was copied to a 2741 terminal with physical tab settings at every fifteenth 
position. 

The TEL TABS command is used to inform the system of the tab settings that the user has at his terminal . If you plan 
to use tab settings, you should inform CP-V of the settings you plan to use. 

J_TAB 5,10,45 ® 

In this example, tab settings of 5, 10, and 45 were specified for this terminal. If you wish to specify or change tab 
settings, enter them any time that the system prints an exclamation point at your terminal. 
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EDIT, 17,29 

END, 18 

FD, 24 

FT, 24 

IN, 20 

MERGE, 18,23 

S, 26 

SE, 26 



Index 



119 



Note: For each entry in this index, the number of the most significant page is listed first. Any pages thereafter are listed in 
numerical sequence. 
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FD command, Edit, 24 
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L 



language processors, using, 36 
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programs, executing, 72 
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